BEGIN {undef $/;}

...

print "Now parsing $filename\n";
my @file = <$INFILE>;