Help for this page

Select Code to Download

Select or download this

$code .= map { "s/\b$_\b/$hash{$_}/eg;\n" } keys %hash;
eval $code;