Help for this page
#!/usr/bin/perl -w ... my $go_menu = &menu2; print "Content-type: text/html\n\n"; print $go_menu;
#!/usr/bin/perl -w ... } 1;