use HTTP::Template; sub my_infosheet { my $self = shift; my $template = $self->load_tmpl('my_infosheet'); (undef, my $info) = split(/\//, $ENV{'PATH_INFO'});