Discussion :

[karaudrey88]

Bonjour je voudrais comparer deux chaines de caractères,l'une est petite et l'autre grande. J'aimerai vérifier que le début de la grande chaine commence par la petite chaine.
Ex
petite chaine : toto
grande chaine : toto.bam_vs_tata.bam.txt
Je sais qu'il faut utiliser les expressions régulières, mais malgré cela je reste bloquée. Pourriez-vous m'aider SVP. Merci

[Quantactique]

Bien sûr !

Je ne sais pas si ta grande chaîne contient des espaces mais au vu de tes exemples je dirais que non.

Aussi je te propose cette expression régulière :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
#!/usr/bin/perl
 
use strict;
use warnings;
 
my $petite_string = "toto";
my $grande_string = "toto_s_en_va_chez_les_tatas";
 
if($grande_string =~ /^$petite_string.*/){
	print "\n"."OK"."\n";	
}

Je t'explique le l'expression, elle est extrêmement simple.

Les caractères utilisés :

• ^ : Il signifie dans ce cas "au début"
• . : N'importe quel caractère
• * : Le caractère précédent est répété 0 ou plusieurs fois

Un petit texte pour expliquer :

Le caractère ^ signifie que l'on souhaite travailler au début de la chaîne de caractère. Ensuite viens la petite chaîne qui elle même sera suivie de 0 à n fois n'importe quel caractère (.*).

Pour plus d'explication ou une question n'hésite pas

[Peps16]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
if($grande_string =~ /^$petite_string.*/){

Juste pour info...le ".*" est nécessaire dans ce cas là? Tu peux pas juste lui mettre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
/^$petite_string/

[Quantactique]

Oui effectivement...

Ca ne m'as même pas traversé l'esprit mais ça marche aussi.

[Philou67430]

Pour un cas aussi simple (et s'il le début de chaine ne contient aucun espace à éliminer), la fonction index peut être utile (et moins consommatrice en temps, mais ce point peut être négligeable si la comparaison n'est pas répétitive) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
my $petite_string = "toto";
my $grande_string = "toto_s_en_va_chez_les_tatas";
if (0 == index($grande_string, $petite_string)) {
  # ...
}