Select Code to Download

use Foo;
package Foo;
...
}
package resume_former_namespace;
...

#!/usr/bin/perl
...

print "   ::Orig: ", foo(), $/;

package Foo;
use Exporter;
...

1;

Foo::Ridden: I'm overridden foo
Foo::Ridden: I'm overridden foobar
   ::Ridden: I'm foo
   ::Orig: I'm foo

Foo::Ridden: I'm foo
Foo::Ridden: I'm foobar
   ::Ridden: I'm overridden foo
   ::Orig: I'm foo