Discussion :

[GregPeck]

Bonjour,

Je dois juste développer un script minuscule en PERL, mais je n'y ai jamais touché.

J'ai beau lire la FAQ et différents exemples, ce que j'écris me parait pourtant correct.

Voici le code

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
#!/usr/bin/perl -s
 
$arg = @ARGV[0];
 
print "Argument : $arg\n";
 
if ($arg=="AA") {
	print "IF AA\n";
} elsif ($arg=="BB") {
	print "IF BB\n";
} else {
	print "ELSE\n";
}

Si j'appel mon code en faisant (en shell)

Code :

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

perl test.pl AA

Ca me donne:

Code :

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

1
2
Argument : AA
IF AA

Ce qui est logique...

Mais quand j'appel :

Code :

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

perl test.pl BB

Ca me donne:

Code :

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

1
2
Argument : BB
IF AA

Pourquoi il ne met met pas "IF BB" ? Qu'est ce que je n'ai pas compris ?

Merci d'avance !