Henri a écrit 153 commentaires

Salut Neox,
je pourrai jamais pretendre que je sais programmer, mais je dirais toujours j'ai des connaissances de base.
si tu relis mes intervension avant les tiennes tu verras bien quel est mon veritable probleme.

Malheureusement ce ne marche pas

meme avec le "" ca ne marche pas je l'avais aussi essaye

Salut Framasky,

j'ai texte l'exemple donc tu as site plus haut a savoir pour ecrire un fichier.
la il ne fonctionne pas car je pense a ma sortie je suis sense recevoir plusieurs Fichiers
il me renvoi qu'un fichier de son choix.
voila ce que j'ai tape dans mon code

    open my $per_line_fh, ">", 'C:\Users\Documents\probe\wo\file2\$file.html' or die "Can't open per-line file $file: $!\n";

quand il est de la sorte, je recois tous les fichiers

open my $per_line_fh, ">", '$file.html' or die "Can't open per-line file $file: $!\n";

Merci Lom, des explications

Merci bien c'est pigé

J'aimerai savoir comment faire donne une direction a ma sortie "print"
c'est a dire que j'ai un dossier quelque par sur C:\Users\Documents\probe par exemple
et j'aimerai que lorsque j'execute mon code code.pl que toute ce que mon code
me revoit soit stocke dans un dossier par exemple "Probe".
je sais comment faire pour traite un Fichier se trouvant dans un dossier sur C: du genre

my $FileResult = 'C:\Users\Documents\probe\DATA2.csv';
    open( my $FhResult, '>', $FileResult );

Salut Framasky,
Merci bien tout est regle comme je le souhaitais

je pense avoir trouve je te presente la solution dans un instant

    for my $i (map {clean($_)} @$row) {
    my $a = '<tr><td>';
    my $c = '</td></tr>';
    my $d = "$a$i$c\n";
    print $per_line_fh $d;
    }

mais li me donne encore un resultat a travailler car a la fin il me produit encore des caracteres supplementaires si tu observes a la fin il ya des caracteres sans valuer. et c'est encore un probleme

<table>
<tr><td>10000
</td></tr>
<tr><td>10000
</td></tr>
<tr><td>0
</td></tr>
<tr><td>50
</td></tr>
<tr><td>1
</td></tr>
<tr><td>
</td></tr>
</table>


je pense avoir trouve je te presente la solution dans un instant

voila a quoi ressemble ma bouble mais malheureusement elle n'a que choisi une value qu'elle me revoit plusieurs fois

for my $i (map {clean($_)} @$row) {
    my $a = '<tr><td>';
    my $b = map {clean($_)} @$row;
    my $c = '</td></tr>';
    my $d = "$a$b$c\n";
    print $per_line_fh $d;
    }

<tr><td>374</td></tr>
<tr><td>374</td></tr>
<tr><td>374</td></tr>
<tr><td>374</td></tr>
<tr><td>374</td></tr>
<tr><td>374</td></tr>
<tr><td>374</td></tr>
<tr><td>374</td></tr>

d'apres le lien que tu m'as envoye j'ai tout essaye malheureusement ce ne fonctionne pas, voila les essais

   #print $per_line_fh "<tr><td>".map {clean($_)} @$row."</td></tr>";
    #my $masortie = "<tr><td>". map {clean($_)} @$row ."</td></tr>";
    my $a = '<tr><td>';
    my $b = map {clean($_)} @$row;
    my $c = '</td></tr>';
    my $d = "$a$b$c";
   #print $per_line_fh join "", "<tr><td>", map {clean($_)} @$row, "</td></tr>";
    print $per_line_fh $d;
    #print $per_line_fh $masortie;

par ailleur il ya plusieur valeurs dans:

map {clean($_)} @$row

ca veut dire qu'au sortie j#attend quelque chose du genre

<tr><td>fault</td></tr>
<tr><td>3456</td></tr>
<tr><td>60000</td></tr>
<tr><td>value</td></tr>
<tr><td>80000</td></tr>


voila l'erreur qu'il me revois sachant que la ligne 51 est la suivante

print $per_line_fh "<tr><td>"map {clean($_)} @$row"</td></tr>";

    C:\Users\Documents\probe\wo>perl systeme1.pl DATA2.csv
    String found where operator expected at systeme1.pl line 51, near "$row"</td></tr>""
            (Missing operator before "</td></tr>"?)
    "my" variable $string masks earlier declaration in same statement at systeme1.pl line 58.
    "my" variable $string masks earlier declaration in same scope at systeme1.pl line 59.
    "my" variable $string masks earlier declaration in same scope at systeme1.pl line 60.
    syntax error at systeme1.pl line 51, near ""<tr><td>"map"
    Global symbol "$row" requires explicit package name at systeme1.pl line 51.
    syntax error at systeme1.pl line 51, near "$row"</td></tr>""
    Global symbol "$per_line_fh" requires explicit package name at systeme1.pl line 52.
    Global symbol "$per_line_fh" requires explicit package name at systeme1.pl line 53.
    syntax error at systeme1.pl line 54, near "}"
    syntax error at systeme1.pl line 61, near "}"
    Execution of systeme1.pl aborted due to compilation errors.
    C:\Users\Documents\probe\wo>

J'avais deja eu a essayer ce que tu dis a savoir

print $per_line_fh "<tr><td>"map {clean($_)} @$row"</td></tr>";

malheureusement ca ne fonctionne pas.

Salut Neox,
vous alle beau dire ce que vous avez a dire cela n'a pour moi aucun sens car null est oblige de repondre a une question pose sur un forum et avec cela tout est clair.
Avant de venir poser ma question sur le forum je me donne de la peine a chercher a la resoudre, et comme je l'ai deja dit nul n'est oblige de reponse a une question pose sur un forum, c'est facultatif, et meme si pour une autre personne la question semble tres bete ou evidante il faut savoir que les personnes n'ont pas la meme faculte de pouvoir retenir les choses, il ya des personnes une fois et il a pige, et d'autre il en faudra 3 ou voir 4 fois pour qu'il pige.
et donc comme je l'ai deja dit que de se mettre a lancer des Mots deplace aux gens autant mieu ignore la question pose et cherche ailleur.
car meme celui qui publi une solution donne est parfois aussi fier d'etre entrain d'aide les gens. ou alors dire que le forum est pour certain categorie de personne(Professionel) qui s'y connaissent deja.

Salut Christophe,
je te remerci bien des explications et du lien

Moderateur,
je dirai que si il faut a tout pris applique votre << Si tu donnes un poisson à un homme, il mangera un jour. Si tu lui apprends à pêcher, il mangera toujours. » ce forum n'auait meme plus son sens d'existe parceque c'est sense etre un lieu d'echange d'idee et si on a des Problemes dans le developement, et null n'est oblige de reagir a la publication d'une question, si on trouve la question bete, il est simple de s'abstenir que d'avance des mots qui ne font pas avance dans la resolusion de la question pose. Moderateur Je vous prie de souvent analyser vos mots avant leur publication, ou alors vos prise de position.

le moderateur laisse passe des phrase comme du genre
"Si tu donnes un poisson à un homme blablabla… "
on n'a pas besoin d'analyser pour comprendre, c'est du mepris total

je suis de nature tres courtois mais on a des gens qui avance des phrases pas du tout catholique au gens. pour qui es ce qu'il se prend. je n'ai malheureusement pas lu son message avant que celui ci soit efface , ce genre de personnage n'a rien a faire dans un forum, qui sense etre pour des personnes instruite

pardon explique donc, car j'ai toujours eu des problemes avec les expressions regulieres, si tu peus m'expliquer ca me fera plaisir

Salut Warwick,
je ne vais pas dire que tu ne n'a jamais aide, j'avoue que tu m'as tres souvent aide il ya aussi Neox vous particulierement vous m'avez toujours faite des Propositions et dans mon message plus haut j'ai bien dit la plus part et non tous.
donc je reconnais bien ton aide. et c'est tres gentil de ta part. j'ai ete juste ete tres irite de lire ton intervension plus haut.

Salut Ack,

c'est exactement cela que je cherchais tu l'as trouve sans toute fois bien me comprendre c'est lui il marche bien. merci beaucoup

my @header = ($input_data =~ /([^,.]+)/g);

Ack,
je reconnais que je me suis mal formuler plus haut, mais li mon message juste au dessus du tien.
je pense que tu pourras me comprend.

Salut Sacha,
tu sais je ne suis pas un bon Programmeur j'apprend et je suis en entreprise pour un stage et malheureusement lorsque j'ai un probleme je ne peus pose mes questions a null d'entre elle car il ne s'y connaissent pas du tout. et c'est la raison pour laquel je viens demander de l'aide sur ce Forum. il est bien vrais mais question peuvent paraitre bete mais on peut me demander de reformuler ma question, et je reconnais une chose mon Francais ecrit n'est pas de bon niveau. mais c'est pas cela la raison pour passer le temps a se moquer des personnes.

ma question concerne les regex (expressions regulieres) car j'ai une liste de noms compose de tout genre de caracteres(§ % & {} ?) que tu puisse imagine ceci aussi bien en debut comme au milieu des nom et malheureusement le regex donc j'ai utilise ne marche pas donc c#est pourquoi je me suis rendu sur ce forum.
voila ce que j'ai utilise my @header = ( =~ /([a-z_]+)/g);
en suite my @header = ( =~ /(\w+)/g);
la deuxieme que j'ai recu sur ce forum fait deja mieu mais a encore des limites car lorsqu#il rencontre le % il l'ignore

Christophe ,
quand on ne comprend pas une question on peut encore demande a son Auteur d'etre plus clair ,
c'est un Forum, je vais du fait que si quelqu'un pose une question sur forum on peut aussi lui poser la question d'etre plus clair, et non passe le temps a trouver tout ce qu'il aura commi comme faute.
et laisse moi te dire , je suis pas longtemps sur ce forum et la plupart des gens qui on trouve ma question ridicul et plein de fautes, son ceux qui ne m'on jamais repondu a une question pose de ma part.
je vais du fait que sur ce Forum on a affaire au personnes qui on faite de haute etude donc venant de ceux la je toruve cela tres bas.