my @array = ( [ 1..3 ], [ 2..6 ] );
print map {"$_\n"} map {@$_} @array;