Enfin bref je voudrai savoir comment manipuler les fichier a l'aiode de script Perl, création, lecture,ecriture,etc..
y a til un bon site traitant de ça ? (je poserai mes questions betes sur ceforum apres avoir lu )
merci de vos reponses

http://www.perldoc.com/perl5.6/pod [...] irectories
 
Et en particulier :
 
http://www.perldoc.com/perl5.6/pod/func/open.html

hello,
 
voici une petite sous routine sympathique....
 
sub open {
my $myfile="";
$myfile = $_[0];
open (DB, "$myfile" ) || &myerror("Impossible d'ouvrir rire: $myfile<br>$!\n" );
@truc = <DB>;
close (DB);
return(@truc);
}
 
et tu y fais appel en envoyant ceci....
 
$mesdata = &open("data/monfichier.txt" );
ou bien
 
@mesdata = &open("data/monfichier.txt" );
 
 
Au choix.....
 
@+
cadou

Faut preciser quand meme que $mesdata = &open("data/monfichier.txt" ); contiendra non pas le contenu du fichier mais le nombre de ligne du tableau (si je ne me trompe pas...), puisque le tableau sera evalue dans un contexte scalaire...

faux.....
 
dans la sous routine tu remarque que tout est stocké dans @truc, puis renvoyez en resultat return(@truc);
 
Peut importe ce que tu a au bout ça marche...
Et cela c'est garanti puisque j'utilise cette routine depuis plus de 6 mois dans tous mes scripts....
 
tu peux mettre le retour dans une variable ou un tableu, tout depend ce que tu souhaite en faire...
 
Si tu ouvre une page qui contient du code html, il n'y a aucun interet a stocké cela dans un tableau.. Tu le colle dans une variable et c'est bon...
 
Par contre si ce sont des données formatées, il vaut mieux le mettre dans un tableau pour le traitement...
 
@+
cadou

 
elle est cool ta routine mais si ta un fichier de plusieurs Mo faut faire attention ...

ah j'ai un fan !!
 
oui bien sur faut faire gaffe a la taille du fichier....
 
allez une autre sous routine bien cool....
 
sub enreg {
($directory, $page, @expdata) = @_;
 
open (DB, ">$directory/$page" ) || &myerror("Impossible de créer le fichier: $directory/$page\n" );
print DB @expdata;
close(DB);
}
 
et tu la lance en faisant  
&enreg("$path","monrep","@mesdata" );
 
il faut bien sur definir $path avant...  
mais avec cela tu te fais plus chier a réecrire tes lignes a chaque fois...
 
@+
cadou