argument en perl

Hoby -  
 aadelmar -
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

  1. aadelmar
     
    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