Select Code to Download

package pm::mytest;

...
  return 'Hello from pm:mytest';
}
1;

#!/usr/bin/perl
use strict;
...
my $q = CGI->new;
print $q->header,$q->start_html,
$q->h1($msg),$q->end_html;