Select Code to Download

Undefined subroutine &main::x called at -e line 1.
BEGIN failed--compilation aborted at -e line 1.

$_ = '-' x (1024*1024*300);

...
  print and next if length($_)==1001; 
  print STDERR $_;
}

perl maxwellsfilter.pl suspect.txt > goodrecs.txt 2> badrecs.txt