Fonction Perl rindex
La description
Cette fonction fonctionne de manière similaire à index, sauf qu'elle renvoie la position de la dernière occurrence de SUBSTR dans STR. Si POSITION est spécifié, renvoie la dernière occurrence à ou avant cette position.
Syntaxe
Voici la syntaxe simple de cette fonction -
rindex STR, SUBSTR, POSITION
rindex STR, SUBSTR
Valeur de retour
Cette fonction renvoie undef en cas d'échec sinon la position de la dernière occurrence.
Exemple
Voici l'exemple de code montrant son utilisation de base -
#!/usr/bin/perl -w
$pos = rindex("abcdefghijiklmdef", "def");
print "Found position of def $pos\n";
# Use the first position found as the offset to the
# next search.
# Note that the length of the target string is
# subtracted from the offset to save time.
$pos = rindex("abcdefghijiklmdef", "def", $pos-3 );
print "Found position of def $pos\n";
Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -
Found position of def 14
Found position of def 3