Select Code to Download

   package Foo;
   use strict;
...
     print "Foo\n";
   }
   1;

   package Bar;
   use strict;
...
    print "Bar\n";
   }
   1;

 package Something;
 use strict;
...
 ....
 Foo::foo;
 1;