while ( my $row = $csv->getline( $fh ) ) 
 {

   if($row->[0] >=1101227)
   {
    $Values[$cnt++]= $row->[0];
    $Values[ $cnt] = $Values[$cnt] + $row->[1];
    $cnt++;
    $Values[ $cnt ] = $Values[$cnt] + $row->[2];
    $cnt++;
    $Values[ $cnt ] = $Values[$cnt] + $row->[3];
    $cnt++;
    $Values[$cnt++]= $row->[4];
    $Values[$cnt++]= $row->[5];
    $Values[$cnt++]= $row->[6];
    $Values[$cnt++]= $row->[7];
    $Values[$cnt++]= "\n";
   }
 }