Help for this page
... map { s/^key1$/new_key2/; $_; } ...
... map { local $_ = $_; s/^key1$/new_key2/; $_; } ...