map {$_ = "-$_"} values %abc; #### $_ = "-$_" for values %abc;