Select Code to Download

package My::Module;
sub new {
    my ( $class, $param_hr ) = @_;
...
# the same notation applies when calling the method
# Perl passes the object ref ($self=$mod) to the method as a first par
+am
print "my key: ".$mod->key()."\n";