Perl: What is the easiest way to flatten a multidimensional array?

Question

What\'s the easiest way to flatten a multidimensional array ?

Answer 1

One level of flattening using map

$ref = [[1,2,3,4],[5,6,7,8]]; # AoA

@a = map {@$_} @$ref;         # flattens it

print "@a";                   # 1 2 3 4 5 6 7 8