|
|
|
|
Bonjour,
Je suis débutante en perl et je rencontre beaucoup de difficultés. Je souhaite creer un parcours de graphe en perl. J'ai un fichier de config. Je place chaque ligne du fichier dans un tableau t1. Puis je place chaque caractère de chaque ligne dans un tableau t2. Si je trouve le caractère "m", le caractère suivant doit etre "a".
Le problème c'est lorsque "m" est à la ligne 1 et le "a" à la ligne 2. Je ne sais pas comment ecrire : si "m" est le dernier caractère de la ligne je regarde le premier caractère de la ligne suivante.
Voilà mon code
for ( 0 .. $#t1) { $i = $_ ;
my @t2 = split (// , $t1[$i]) ;
for ( 0 .. $#t2 ) {
$j=$_
if ($t2[$j] =~ /m/) {
print "on a trouvé m; on cherche a\n" ;
$IdxCaractereDeLaLigne = ++$IdxCaractereDeLaLigne;
if ($tableauCaractere[$IdxCaractereDeLaLigne] =~ /'[a-zA-Z0-9]+'/) {
print "on a trouvé a\n" ;
}
else { print "il faut regarder la ligne suivante\n";
next;
}
}
if ($tableauCaractere[$IdxCaractereDeLaLigne] =~ /'[a-zA-Z0-9]+'/) {
print "on a trouve a dans la ligne suivante\n" ;
}
else {
print "ERREURRR! le m n'est pas suivi par a \n";
}
}
}
Merci d'avance.
Configuration: Windows XP Internet Explorer 6.0
Salut,
|
Salut lami20j,
|
Salut,
#!/usr/bin/perl
use strict; use warnings;
while(<DATA>){
print "$. ok\n" if /{\s*'\w+'\s*=\>\s*\[\s*('\w+',)*\s*'\w+'\s*]\s*}/;
}
__END__
my %toto => ( 'AAAAAA' =>{ 'uuu' => [ 'toto','tata', 'mouloud' ] } );
my %toto => ( 'AAAAAA' =>{ uuu' => [ 'toto','tata', 'mouloud' ] } );
my %toto => ( 'AAAAAA' =>{ 'uuu' => [ 'toto','tata', 'mouloud' ] } );
my %toto => ( 'AAAAAA' =>{ 'uuu' => [ 'toto','tata', 'mouloud' } );
106485010510997108 |
Salut,
|
Bonjour,
|
Salut,
for ( 0 .. $#t1) { $i = $_ ; my @t2 = split (// , $t1[$i]) ;
for ( 0 .. $#t2 ) {
quelque soit les conditions tous les éléments des tableaus sont parcourus de la façon suivante Pour chaque élément de @t1 Traite les éléments de @t2Je pense qu'il faut faire autrement ;-) Je vais regarder ce soir 106485010510997108 |
Le fichier comporte plusieurs lignes.
|
Re,
my %toto => ( 'AAAAAA' =>{ 'uuu' => [ 'toto','tata', 'mouloud' ] }, 'BBBBB' =>{ 'SSS' => [ 't', 'ta', 'mod' ] } );
comme ça ça sera plus facile de traiter 106485010510997108 |