while ( my $row = $csv->getline( $fh ) ) { $patron_count++; push @rows, $row;