Select Code to Download

my $o = Child->new;
print ref($o);  #Child
...
my $method = 'testSign';
my $code = $o->can($method);
print $code; # CODE(0x20d5b94)

$o->$method()

$o->$code()

perl -v  #AS-635

    my %_init_mems = (
        Password    =>     \&testPassword,
...
        Name        =>    \&testNameX2,
        Titel        =>    \&testStrX,
    );