Help for this page

Select Code to Download


  1. or download this
    CS
    CS
    
  2. or download this
    open(PBXNUM1, ">pbxnum1");
    open(MYINPUTFILE, "pbxnum");
    
    ...
        $hash {$_} ++;
        print PBXNUM1 "$_$hash{$_}\n";
        }
    
  3. or download this
    CS1
    CS2
    
  4. or download this
    open(PBXNUM1, ">pbxnum1");
    open(MYINPUTFILE, "pbxnum");
    
    ...
        $hash {$_} ++;
        print PBXNUM1 "$_$hash{$_}\n";
        }