Help for this page

Select Code to Download


  1. or download this
    @thearray = (1, 4, 6)
    my $line = <INFILE>;
    ...
    foreach(my $i = 0; $i <= $#thearray; $i++)   {
      push @bigarray[$thearray[$i]], [$line, $column[$thearray[$i]];
    }
    
  2. or download this
    @array_1 = [$line, $column[1]]
    @array_4 = [$line, $column[4]]
    @array_6 = [$line, $column[6]]