Select Code to Download

package Foo;
use Readonly my $SPAM_FACTOR = 22; 
...

printf "I have a lovely foo, it has %s bar and %s baz " , $foo->bar, $
+foo->baz;
# hey! where's my shoe!?