Mega Code Archive

 

Categories / Perl / Array

 

Using array reference with two-dimensional array

@array = (     ["A", "F"],     ["B", "E", "G"],     ["C", "D"], ); for $arrayreference (@array) {     print join (", ", @{$arrayreference}), "\n"; }