$array[$_] or substr($string, $_, 1) |= "\x20" for 0 .. $#array;