Regex avec perl

salart -
salart - 27 mars 2009 à 15:41

Bonjour,

sauriez-vous par hasard.comment je peux definir la regle suivante.
Si j'ai une lettre majuscule parmi une serie de lettre avec minuscule,ponctuation, nombre , pour dire si ele est majuscukle, je fais =~/[A-Z]/ est-ce que cela peut marcher.

je donne un exemple maiS.éon, comment puis dire qu'il y a bie n une majuscule.

sauriez-vous comment supprimer le retour à la lignre d'un mot.
j'ai un fichier "toto, titi @zez@", j'ai spliter le fichiers en 3 colonnes. je probléme est que lorsque je veux les affficher, il me fait un \n lorsque je fais un print de @zez@. je voudrais bien m'en débarrasser.

pour toute idée, je suis prebeur merci

Afficher la suite

A voir également:

Regex avec perl
Denon perl pro test - Accueil - Audio
Regex buddy - Télécharger - Édition & Programmation
Active perl - Télécharger - Édition & Programmation
Regex tout sauf - Forum Java
Regex ne commence pas par ✓ - Forum Programmation

1 réponse

Réponse 1 / 1

salart

J'ai trouvé

open(SORTIE2,"< sortie11.txt");
my @tab2;
my $k = 0;
foreach(<SORTIE2>)
{
chomp;
	@tab = split(/\t/, $_);
	if($tab[1] eq "NUM")
		{
 		print chop($tab[2])." ";
		}
	elsif ($tab[0] =~/[A-Z]/ && $k != 0)
		{
		print "\n".$tab[0]." ";
		}
	else {
		$k =1;
		print $tab[0]." ";
		}

}
close SORTIE2;

Discussions similaires

regex "ne commence pas par XX"

Regex negation chaine caractère

Expressions régulières "ne contient pas ..."

Tabulation dans expression régulière

PHP preg_match et REGEX ne marche pas comme voulu

Votre réponse

Discussions similaires