Select Code to Download

            package Foo;
            use strict;
...
                delete $foo{$self};
            };

            package Foo::Pretty;
            use base qw(Foo);
...
                },
            ;