argument en perl

Fermé
Hoby - 25 août 2000 à 14:30
 aadelmar - 25 avril 2010 à 00:09
Quelqu'un sait -il comment passer un argument
en langage PERL ?

ma_commande_perl mon_argument

(Je veux en fait que ma_commande_perl traite le fichier d'entre mon_argument)

1 réponse

hoby ----
ma_commande_perl mon_argument

(Je veux en fait que ma_commande_perl traite le fichier d'entre mon_argument)
---------------------------------
my $fichier_source = $ARGV[0];

# c-a-d que Perl prendra mon_argument pour le nom du fichier à traiter

exemple:
commande 1er_arg 2eme_arg 3eme


if (@ARGV) {
  $prems = $ARGV[0];
  $deux = $ARGV[1];
  $trois = $ARGV[2];
}

print "mon premier arg est $prems\n";
print "mon second est $deux\n";
print "mon troisiéme est $trois\n";


>donnera
mon premier arg est 1er_arg
mon second est 2eme_arg
mon troisiéme est 3eme
0