@array = map{ [ 'a'..'f' ] } 1 .. 6;; print @$_ for @array;; a b c d e f a b c d e f a b c d e f a b c d e f a b c d e f a b c d e f