Bonjour,

j'ai un script abc.pl (voir ci-dessous) dans lequel je place en parametre :

abc.pl -r lefichier

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
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
 
 
use Net::FTP;
use File::Basename;
use MIME::Lite;
use Cwd; 
use POSIX 'strftime';
use Sys::Hostname;
use strict;
use warnings;
use utf8;
use Carp;
 
 
my @Tableau;
my @TableFichier="";
my $ParamGlobal;
 
 
my $toto;
 
 
############################
# Menu d'affichage - Passage des paramétres
############################
 
@Tableau = (@ARGV);
 
#$toto=$Tableau[0] ;
#print "t>> $toto" ;
 
	if ( $Tableau[0] eq "-r" ) {	
		$toto=$Tableau[1] ;	
	}
	print "$toto\n" ;
 
exit ;

J'ai le message d'erreur en sortie :

Use of uninitialized value $Tableau[0] in string eq at C:\PROC\abc.pl line 43.
Use of uninitialized value $toto in concatenation (.) or string at C:\PROC\abc.pl line 46

Si je mets ce meme script sur une autre machine, je n'ai pas le souci !! auriez vous une idée ?