map { [ split '', $_ ] } unpack join(" ", ("a$width") x $height), $string;