Função Perl rindex

Descrição

Esta função opera de forma semelhante ao índice, exceto que retorna a posição da última ocorrência de SUBSTR em STR. Se POSITION for especificado, retorna a última ocorrência em ou antes dessa posição.

Sintaxe

A seguir está a sintaxe simples para esta função -

rindex STR, SUBSTR, POSITION

rindex STR, SUBSTR

Valor de retorno

Esta função retorna undef em caso de falha, caso contrário, a posição da última ocorrência.

Exemplo

A seguir está o código de exemplo que mostra seu uso básico -

#!/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";

Quando o código acima é executado, ele produz o seguinte resultado -

Found position of def 14
Found position of def 3