my @records = split($/, $data);