Help for this page

Select Code to Download


  1. or download this
    package atm;

my %code = (
...
} else {
  # no matching sub
}
  2. or download this
    if ( my $sub = atm->can($varN) ) {
  $sub->( object_vars($varN) );
} else {
  # no matching sub
}