for( @male Z @female )->[$m,$f] { # .... } 

##</code><code>##

for (@male Z @female).tree ->[$m,$f] {
    # ....
}

##</code><code>##

my @array;
for @male Z @female -> $m, $f {
    push @array, "$m $f;
    # or
    @array.push: "$m $f";
    # or
    @array.push: $m ~ ' ' ~ $f
}

# or

my @array = (@male Z @female).map("$^a $^b");

##</code><code>##

my @array = @male Z~ @female; # without joining space

##</code><code>##

# with the list repetition operator:
@array = @male Z~ ' ' xx @male Z~ @female;

# with cross instead of zip:
@array = @male X~ ' ' Z~ @female;