for (@arr=%hash) { # remove spaces in $_ ... } %hash=@arr;