my $content = do {
    local $/;
    <IN>;
    };
my @records = split /(?<=Metadata\: 1114890\n)/, $content;