Select Code to Download

use strict;
package foo;
...
__END__
foo: quux => *foo::quux
Howdy, world!

# file include.pl
use strict;
...
sub japh {
    print $me,"\n";
}

#!/usr/bin/perl
use strict;
our $me = "Just another perl hacker";
require "include.pl";
japh();

Just another perl hacker