my %hash = ( '.111' => 'Aaaa', '.222' => 'Bbbb', '.333' => 'Cccc' ); $hash{$_} = substr $hash{$_}, 2 for keys %hash;