Select Code to Download

#!/usr/bin/perl
### the file doing the requiring
...
require('tmp.pl');

asdf();

#!/usr/bin/perl
### the file being required
...
sub asdf { print "well howdy"; }

1;

### the output
hi there
well howdy