[PERL] Expressions régulières

Recherche :

Dernière réponse
Sujet : [PERL] Expressions régulières
Erwan_	ouep nan ca marche :) juste le "~" de "@result =~ split (/,/,$toto); " qui n'est plus a sa place a ce moment la ... sinon c ok, j'ai pu continuer mon truc... jusqu'à la prochaine prise de tete :)

Votre réponse

Nom d'utilisateur

Pour poster, vous devez être inscrit sur ce forum .... si ce n'est pas le cas, cliquez ici !

Le ton de votre message

Votre réponse

Smilies

Liste des smilies perso
Wiki smilies
Chercher un smiley

Options

Activer votre signature
Désactiver les smilies
Activer la notification par email du sujet

Aperçu

Vous avez perdu votre mot de passe ?

Vue Rapide de la discussion

Erwan_

ouep nan ca marche :)

juste le "~" de "@result =~ split (/,/,$toto); "

qui n'est plus a sa place a ce moment la ...
sinon c ok, j'ai pu continuer mon truc... jusqu'à la prochaine prise de tete :)

stef_dobermann

alors marche ou pas ??

si tu veux un autre coup de main ou de pieds pas de pb je suis la
ou juste une optimisation de code (sans aucune grosse tete de ma pars :jap: )
l'histoire de te montrer la puissance du langage :D

Erwan_

ok dak !
j'vais tester, merci pour tes lumières ...

stef_dobermann

:lol: ligne =~ /(.*),(.*),(.*),(.*)/; # date,heure,note,alert :lol:
desolé g commencer comme ca

bon rien de plus simple demo :
$toto = "13/01/2001,00:05,Va te coucher !,1";
@result =~ split (/,/,$toto);

ensuite tu traite @result qui contient tout les résultats :ouch:
aussi $result[0] contient 13/01/2001
$result[1] = 1\n;

c koi le \n
c le retour chariot à la fin de la ligne
pour l'enlever tu fait
$result[1] =~ s/[\n\r]//sg;
et voila $result[1] contient 1;
qui pour info peut etre traité comme un integer :D
VIVI PERL :D

[edtdd]--Message édité par SteF_DOBERMANN--[/edtdd]

Erwan_

yop,yop ... marche po ton truc

je pensais plutot à un pb au niveau des caractere generiques

yop	13/01/2001,00:05,Va te coucher !,1 $ligne =~ /(.),(.),(.),(.)/; # date,heure,note,alert

Erwan_

bon ca commence à prendre la tête ce truc !

Voila g un fichier texte que je voudrais parser, voila la tronche du fichier:

13/01/2001,00:05,Va te coucher !,1
13/01/2002,00:06,Va te coucher !,1
13/01/2003,00:07,Va te coucher !,1
13/02/2001,00:08,Va te coucher !,1
13/03/2001,00:09,Va te coucher !,1
13/04/2001,00:15,Va te coucher !,1
13/01/2001,00:05,Va te coucher !,1

le type, par ligne est donc : <string>,<string>,<string>,<string>

Pour le parser j'utilise l'instruction readline
et la regexp suivante :

$ligne =~ /(.*)\,(.*)\,(.*)\,(.*)\n/; # date,heure,note,alert

bon pb ca marche pas evidemment ...
Je nuis pas trop familié avec les exp reguliere avec perl, si kk1 à une meilleur idée ??
merci