Help for this page

Select Code to Download


  1. or download this
    my ($var1, $var2, $parray) = @_;
    
  2. or download this
    sub format_output {
        my ($var1, $var2, $parray1, $parray2) = @_;
    ...
            printf "Array item #%d = %s\n", $i+1, $parray2->[$i];
        }
    }