Select Code to Download

package Module;

use strict;
...
1;

__END__

#!/usr/local/bin/perl

...
my $obj               = Module->new();

print "REF: " . ref($obj) ."\n";