Discussion :

[azad_892000]

Bonjour,

je débute sur le langage Perl, je voudrais récupérer les arguments passés en ligne de commande. Voici mon programme tout simple :

Code :

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

1
2
3
4
5
6
 
#!/usr/bin/perl -w
 
use strict;
 
print "$ARGV[0`\n"

J'appelle le programme avec la commande :

Code :

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

1
2
 
perl script.pl toto

On me renvoit l'erreur suivante :

Code :

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

1
2
3
 
syntax error at script.pl line 5, near "print"
Execution of script.pl aborted due to compilation errors.

Sauriez-vous d'où vient le problème ?
Merci

[azad_892000]

Désolé pour l'erreur de frappe :

Code :

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

1
2
3
4
5
6
 
#!/usr/bin/perl -w
 
use strict;
 
print "$ARGV[0]\n"

[Jedai]

Ca manque de ";" à la fin...

--
Jedaï

[azad_892000]

Code :

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

1
2
3
4
5
6
 
#!/usr/bin/perl -w
 
use strict;
 
print "$ARGV[0]\n";

J'ai toujours une erreur :
Use of uninitialized value at script.pl line 5.

[Jedai]

J'ai toujours une erreur :
Use of uninitialized value at script.pl line 5.

Tu n'as pas fourni d'arguments au script.

--
Jedaï

[djibril]

Code :

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

1
2
3
4
5
6
7
8
9
10
#!/usr/bin/perl
use warnings;
use strict;
 
if (scalar(@ARGV) == 0) {
  print "Vous n'avez pas donné d'arguments au script\n";
  print "$0 arg1 arg2 ...\n";
  exit;
}
print "$ARGV[0]\n";