$rec{$key} = $value if defined $key;
    $key = $newkey;
print "KEY = $key, VALUE = $value\n";
[download]

put that print statement one line earlier, like this:

    $rec{$key} = $value if defined $key;
    print "KEY = $key, VALUE = $value\n";
    $key = $newkey;
[download]