#!usr/bin/perl # 2005-03-01 : # ouvrir le fichier contenant la liste des cartes open(CARTES, "imagescartes.txt") or die "Ouverture du ficher imagescar +tes.txt impossible: $!\n"; -T "imagescartes.txt" or print "ceci n'est pas un fichier texte\n"; while ($ligne = <CARTES>) { chop($ligne); while ($amourss .= /^a.+(f|g)$/g ) { $total++; } }
In reply to Re^2: regular expressions
by wannabeboy
in thread regular expressions
by wannabeboy
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |