... map { s/^key1$/new_key2/; $_; } ...

##</code><code>##

... map { local $_ = $_; s/^key1$/new_key2/; $_; } ...