if ($count >= $desired) { print "$csv2\n"; ++$matched; } } print "$_\n\n" if $matched;