Perl & String
Résolu
vindicien
Messages postés
131
Date d'inscription
Statut
Membre
Dernière intervention
-
vindicien Messages postés 131 Date d'inscription Statut Membre Dernière intervention -
vindicien Messages postés 131 Date d'inscription Statut Membre Dernière intervention -
Bonjour à tous,
J'aimerai savoir si il existe une fonction en Perl permettant de réaliser l'équivalent d'un "like" en SQL.
Concrètement :
if (ma_valeur LIKE %TRUC%)
{
print "ca roule";
}
Pour l'instant j'utilise des sed mais je pense qu'il y a plus simple non ?
J'aimerai savoir si il existe une fonction en Perl permettant de réaliser l'équivalent d'un "like" en SQL.
Concrètement :
if (ma_valeur LIKE %TRUC%)
{
print "ca roule";
}
Pour l'instant j'utilise des sed mais je pense qu'il y a plus simple non ?
A voir également:
- Perl & String
- Denon perl pro test - Accueil - Audio
- Active perl - Télécharger - Édition & Programmation
- System.io.__error.winioerror(int32 errorcode, string maybefullpath) - Forum Windows
- Uninitialized string offset ✓ - Forum PHP
- Eol while scanning string literal ✓ - Forum Python
1 réponse
Salut,
Les regex sont implémentées en perl et l'opérateur est m//, tu n'est pas obligé d'utiliser m/
/TRUC/ cherche dans une chaîne de caractères T suivi de R suivi U suivi de C
C'est plus puisant que like, puisque tu peux encrer la recherche, tu peux utiliser de quantificateurs, des captures, des références arrière, des test avant/arrière positif et négatif, etc.
Une exemple
Les regex sont implémentées en perl et l'opérateur est m//, tu n'est pas obligé d'utiliser m/
/TRUC/ cherche dans une chaîne de caractères T suivi de R suivi U suivi de C
C'est plus puisant que like, puisque tu peux encrer la recherche, tu peux utiliser de quantificateurs, des captures, des références arrière, des test avant/arrière positif et négatif, etc.
Une exemple
lami20j@debian:~/trash/AB$ cat truc.pl
#!/usr/bin/perl
use strict;use warnings;
my $val="il y a pas mal des TRUC en sed, awk, Perl, Python, etc\n";
if ($val=~/TRUC/){
print "Ca roule\n";
}
__END__
lami20j@debian:~/trash/AB$ perl truc.pl
Ca roule
Bonne journée et joyeuses fêtes de fin d'année !!!