Discussion :

[miomikio]

j'essaye d'executer un script perl mais quand je met +100 a cote ca marche pas
je suis debutant dans perl j'ai besoin d'aide ??

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
@n = 2..9;
foreach my $a (@n) {
  foreach my $b (@n) {
    foreach my $c (@n) {
      foreach my $d (@n) {
        if ( $a+100*$b+100*$c*$d == 120 ) {
          print $a, $b, $c, $d, "\n";
        }
      }
    }
  }
}