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