for my $x ( $sub_x->() ) {
    for my $y ( $sub_y->() ) {
         return [ $x,$y ];
    }
}