for $x(1...3){
     for$y(1...3){
     $pro=$x ** $y;
     push @products, $pro;
     }
}