my @temp = @arr1; push @temp,@arr2; print $_ for @temp; #### print @$_ for ( [ 'a' .. 'e' ], [ 0 .. 4 ] ); #### print @$_ for \@arr1, \@arr2 #### print $_ for (map { @$_ } \@arr1, \@arr2);
## print @$_ for ( [ 'a' .. 'e' ], [ 0 .. 4 ] ); ##
## print @$_ for \@arr1, \@arr2 ##
## print $_ for (map { @$_ } \@arr1, \@arr2);