Discussion :

[donny]

salut,

J'utilise getopt et je ne comprends pas une chose;
getopt est censer me renvoyer une erreur si j'appel mon script sans le parametre que je lui est preciser;

Voila mon code;

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
use strict;
use warnings;
use Getopt::Long;
 
my $name = 0;
 
 
my $result = GetOptions(
    "name=s" => \$name   
 
);
 
 
if ( $result == 0 ) { exit 1; }

si j'appel mon script comme ceci
edit.pl -n toto

il fonctionne et je n'ai pas d'erreur
et si je l'appel comme ceci
edit.pl
edit.pl -n

mon script fonctionne alors qu'en theorie il ne devrait pas tourner

???

Merci.

[GnuVince]

Code :

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

1
2
3
4
5
6
7
8
9
 
$ perl opt.pl -n toto
# Fonctionne, car tu as donné un argument à --name
 
$ perl opt.pl
# Fonctionne, car --name n'est pas un argument obligatoire
 
$ perl opt.pl -n
# Ne fonctione pas car --name requiert un argument

Est-ce que ça t'éclaircit?

[donny]

je me suis inspiré de cela sur le site de cpan

Code :

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

1
2
3
4
5
6
7
use Getopt::Long;
  my $data   = "file.dat";
  my $length = 24;
  my $verbose;
  $result = GetOptions ("length=i" => \$length,    # numeric
                        "file=s"   => \$data,      # string
                        "verbose"  => \$verbose);  # flag

comme j'avais compris file et length avaient obligatoirement besoin d'un argument ( car "=")
et seulement verbose etait optionnel.
ce que tu m explique c est que tous les parametre ici n'ont pas besoin d'argument alors ?
comment les rendre obligatoire alors ?

[donny]

j'ai lu ça ici

Pour cela, Getopt::Long utilise une syntaxe très simple : les arguments optionnels ajoutent un : après le nom de l'option alors que les arguments obligatoires sont spécifiés par un =. Pour préciser le type, il suffit de rajouter après le = (ou le un caractère représentant le type attendu : s pour une chaîne (string), i pour un entier (integer) ou f pour un réel (float). Voici ce que cela donne :

et sa provient de se site
http://articles.mongueurs.net/magazines/linuxmag49.html

[GnuVince]

Le = veut dire que l'argument suivant l'option est obligatoire (soit dit en passant, les options et arguments sont deux choses différentes: les options commencent par un ou deux traits d'union et les arguments suivent une option). Exemple:

Code :

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

1
2
3
4
5
 
$result = GetOptions(
  "nom=s" => \$nom, # Si tu donnes --nom, tu dois obligatoirement donner un nom
  "sexe:s" => \$sexe, # Si tu donnes --sexe, tu peux omettre de le spécifier
);

Comme tu vois, c'est l'argument suivante l'option qui est obligatoire ou optionnel. Par contre, les deux options sont optionnelles. Voici comment tu peux te servir de ce programme:

Code :

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

1
2
3
4
5
6
7
 
$ perl foo.pl
$ perl foo.pl --name gnuvince
$ perl foo.pl --sexe
$ perl foo.pl --sexe male
$ perl foo.pl --name gnuvince --sexe
$ perl foo.pl --name gnuvince --sexe male

Est-ce que ça t'aides?

[donny]

ouai sa m'aide
et donc c'est impossible d'obliger la personne à saisir -n ou --name et d'afficher un message d'erreur au cas ou elle ne le saisit pas avec getopt ?