Help for this page

Select Code to Download

Select or download this

## file: Myperl.pm
package Myperl;

...
}
  
1;

Select or download this

use Myperl;
my $s=4;
my %h=(0..5);
my $myresult=getInfo($s, \%h);  ## pass a reference