s/$1/exists($hash{$2}) ? $hash{$2} : "$2:mapping not done"/e;

##</code><code>##

Use of uninitialized value in concatenation (.) or string