Help for this page

Select Code to Download


  1. or download this
    sub test {
        my ($arg) = @_;
    ...
        print "$hashname\n";
        return ($hashname);
    }
    
  2. or download this
    sub test {
        my ($arg) = @_;
    ...
        elsif ($arg == 2) { return 'hash2'; }
        die;
    }