|
|
|
|
Bonjour,
Langage perl
En entrée j'ai un fichier .txt.
Je veux lire ce fichier et écrire dans certains champs d'un autre fichier qui sera utliser pour la jour une table de la base Oracle.
J'ai la structure de mon fichier .txt (champs et position)
Comment faire ?
Merci d'avance pour votre contribution
Configuration: WNNT, UNIX,
Tu peux trouver les bases ici :
|
Ben il suffit d'ouvrir un fichier en lecture, récupérer les données interessantes, faire tes calculs, puis écrire le fichier de sortie en conséquence...
#!/usr/bin/perl -w
($f,$out) = @ARGV;
if (@ARGV!=2){
print "Usage : $0 fichier_in fichier_out \n";
die "$!\n";
}
open FICHIER, "$f";
open OUT, "> $out";
#Lire le fichire d'entrée
#Ecrire le fichier de sortie
close FICHIER;
close OUT;
Non ? Ou j'ai mal compris ? Bonne chance en tout cas |
Tu l'écris dans l'ordre ;)
#....
#$out nom du fichier de sortie
open OUT, "> $out";
#...
print OUT "J'ecris le contenu de la table de hachage hash que j'ai deja rempli auparavant dans mon joli programme perl\n";
foreach $i (sort keys %hash){
if (defined($hash{$i})){
print OUT "$hash{$i}\n";
}
}
#...
close OUT; |
Google is life ;)
|