Select Code to Download

  foreach $line ( <INFILE> )
  {
      if( $line =~ /^Name/ )
...
         push @rowValues, [ split(/\t/, $line) ];
      }
  }

  $row = 0;
  $count = 0;
...
    }
    $row++;
  }