my @array4=qw(separate and yet); my @array5=qw(flattened it); showElements(@array4, @array5); #as-is sub showElements{ foreach $element(@_){ print "$element "; } }