La fonction Perl "m" est utilisé pour correspondre à une chaîne dans une variable ou un fichier . Ceci est utile si vous essayez de trouver une ligne particulière dans un fichier , comme une ligne d'avertissement dans un fichier de log . Il peut également être utilisé pour vérifier qu'une valeur soumis par l'utilisateur contient les informations correctes. Vous pouvez faire correspondre une chaîne littérale ou vous pouvez utiliser des expressions régulières --- une façon d'utiliser méta-caractères pour représenter un caractère ou un ensemble de caractères. Instructions
1
Ouvrez un document texte dans n'importe quel éditeur de texte.
2
tapez la ligne
#! /Usr /bin /perl < br . >
3 type de
les lignes
my $ my_string ;
$ my_string = " Ceci est un exemple chaîne " ; .
impression
$ my_string " \\ n " ;
pour créer et imprimer de la variable qui contient la chaîne " . c'est une chaîne d' exemple "
4 < p> tapez les lignes
if ($ my_string = ~ m /test /i)
{print " Oui, 'test' de la chaîne a été trouvée \\ n " ; }
autre
{print " 'test' la chaîne n'a pas été trouvé \\ n " ; }
pour créer le "if" qui vérifie si la chaîne "test" existe.
5
tapez les lignes
if ($ my_string = ~ m /example /i )
{print " Oui, " exemple " de la chaîne était trouvé \\ n " ; }
autre
{print" ' exemple ' La chaîne n'a pas été trouvé \\ n " ;}
pour créer l'instruction if qui vérifie pour voir si la chaîne « exemple » existe .
6
Enregistrez le fichier sous " match.pl " .
7
Tapez la commande " perl match.pl " à l'invite de commande pour tester le script.