use List::MoreUtils qw(each_array);