<% Dumper $user %>

<%once> use lib qw( /home/tfp/toupeira/lib ); use Toupeira::Users; use Data::Dumper; <%init> my $user = Toupeira::Users->new( username => 'tfp' );