Select Code to Download

$ perl -Mstrict -Mwarnings -le '
    package MyDir::Class;
...
Class object: MyDir::Class::SubClass=HASH(0x7ffeda029cb0)
Class Name:   MyDir::Class::SubClass
Object ID:    Y