foreach my $param1 ( @p1 ) {
    foreach my $param2 ( @p2 ) {
        my $ergebnis = bla(param1, $param2);
    }
}