Select Code to Download

[johnsca@CORY tmp]$ cat tst.pm
#!/usr/bin/perl

...
use tst { foo => 'bar' };
[johnsca@CORY tmp]$ ./tst
foo: `bar'