use strict;  # I'm not a total neanderthal

$/ = /\x0a/; # also tried '\x0a'
open IN, shift;
my @records = <IN>;
close IN;

# number of records == 1 (globbed!)