You're going about it backwards. In the example you posted, it's much easier to test if the line contains what you want, rather than filtering out everything else.

if ($_ =~ /^13\s+251/) {
  print $_;
}
[download]