Bonjour,
je tente d'utiliser AppConfig pour lire un fichier de conf, le problème c'est que dans les variables j'ai toujours '1', qu'est ce qui ne tourne pas rond?
le fichier de conf:
test
debug
niveau = 4
repertoire = /tmp
repertoire = /var
repertoire = /home
Le script .pl:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#!/usr/bin/perl -w
use strict;
use File::stat;
use AppConfig qw(:expand :argcount);
# CONFIG
 my $config = AppConfig->new(
'test', 'debug',
'niveau' => ARGCOUNT => 1 ,
'repertoire' => ARGCOUNT => ARGCOUNT_LIST);						
 
$config->file('test.conf');
print "test : ", $config->test(), "\n";
print "debug : ", $config->debug(), "\n";
print "niveau : ", $config->niveau(), "\n";
my $rep = $config->repertoire();
foreach my $in (@$rep){
	print "in ",$in,"\n";
}
print "\n\n";
Ce que j'obtient:
test : 1
debug : 1
niveau : 1
merci d'avance pour vos retour