Salut a tous ,
voila le code qui devrais m'ouvrir le fichier situe dans un chemin precise en parametre de ma fonction CRC_calculation:
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
#!/usr/perl5/bin/perl#!/tools2/kits/perl/5.003/solaris/bin/perl
use strict; use warnings;
#Fonction de calcul du CRC input=fichier a lire 
sub CRC_calculation{
my @params = @_; 
my $file = $params[0];
open (Fic,"$file")||die "Problemes d'ouverture: $!";
my $j=0;
while (( my $nb=sysread(Fic, my $enr,1)!=0))
{$j++;
}
#my $nLgFile=length(F);
print "\nnombre de caracteres lues: $j\n";
#print "Longueur du fichier de Factory Settings: $nLgFile\n";
 
close(Fic);
#return ()
}
#appel de la fonction
&CRC_calculation();
Pour lancer le script je tape sous la fenetre de commande windows: "perl.exe nomDuScript.pl chemin_du_fichier(=C:/desktop/test.txt)"
Je recolte alors une erreur me disant que le fichier n'existe pas ??

merci d'avance de votre aide