$arr[0] = @alpha; #### $arr[0] = \@alpha; #### $arr[0] = [ @alpha ]; #### foreach( \@alpha, \@beta ) { push @arr, $_; } #### foreach( [ @alpha ], [ @beta ] ) { push @arr, $_; } #### my $len = @arr; # Number of lists contained in @arr. my $len = @{ $arr[0] }; # Number of elements contained in the list # referenced by $arr[0].