my %sites = (
   'profil'   => \&profil,
   'fotos'    => \&fotos,
   'mailbox'  => \&mailbox
);

if (exists $sites{$cgi->param('show')}) {
   $sites{$cgi->param('show')}->(\@args);
} else {
   print "404 Not found";
}

sub profil {
   # aufruf von HTML::Template::Compiled usw...
}