my @grid = ( [split '', ' N KA L '], [split '', ' BICCYDITZI '], [split '', ' ROLIEDPBHOS '], [split '', ' IILVEVNUYZL '], [split '', 'TSECRENEOTYUE'], ); p @grid; [ [0] [ [0] " ", [1] " ", [2] "N", [3] " ", [4] "K", [5] "A", [6] " ", [7] " ", [8] " ", [9] "L", [10] " ", [11] " ", [12] " " ], [1] [ [0] " ", [1] "B", [2] "I", [3] "C", [4] "C", [5] "Y", [6] "D", [7] "I", [8] "T", [9] "Z", [10] "I", [11] " ", [12] " " ], [2] [ [0] " ", [1] "R", [2] "O", [3] "L", [4] "I", [5] "E", [6] "D", [7] "P", [8] "B", [9] "H", [10] "O", [11] "S", [12] " " ], [3] [ [0] " ", [1] "I", [2] "I", [3] "L", [4] "V", [5] "E", [6] "V", [7] "N", [8] "U", [9] "Y", [10] "Z", [11] "L", [12] " " ], [4] [ [0] "T", [1] "S", [2] "E", [3] "C", [4] "R", [5] "E", [6] "N", [7] "E", [8] "O", [9] "T", [10] "Y", [11] "U", [12] "E" ] ]