Select Code to Download

(my $file = $class) =~ s^::^/^g;
require "$file.pm";

my $file = File::Spec->catfile( split /::/, $class ) . ".pm";