Bonjour,
J'ai fait un script qui doit m'envoyer un fichier par mail.
Les paramètres mail sont passé via un fichier d'option.
Lorsque j'utilise mon script, j'ai l'erreur:
J'utilisai mon script depuis 2 an mais j'ai été obliger de réinstaler mon PC (XP Pro + activePerl).J'ai donc supposer que mes module n'etait pas a jour.Une fois la maj effecrtuée, tjr le meme probleme.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Undefined subroutine &main::ParseConfig called at C:\toto.pl line 18.
Voyez vous d'où peut venir le probleme.
Merci par avance.
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 use Config::General qw(ParseConfig); use Getopt::Long; use Mail::Sender; use Win32API::File; use strict; my %config; my ($opt_conf,$opt_h); # Vérification des options passées en ligne de commande GetOptions("c=s" => \$opt_conf,"conf=s" => \$opt_conf, "h" => \$opt_h, "help" => \$opt_h); if ($opt_h) { print_help();exit;} elsif ($opt_conf) { %config = ParseConfig(-ConfigFile => $opt_conf); .....
Partager