Select Code to Download

package Foo;
require Bar;
...
# more stuff...

1;

package Bar;

...
# more stuff...

1;

#!/usr/bin/perl

use Foo qw(blorf);

$ perl -MFoo=blorflydick -e 1
Bar: got 'blorflydick' from Foo