Perl rindex()用法及代码示例

Perl中的rindex()函数的操作类似于index()函数，不同之处在于它返回字符串(或文本)中最后一次出现的子字符串(或模式)的位置。如果指定了位置，则返回该位置或该位置之前的最后一次出现。

用法：

# Searches pat in text from given Position

rindex text, pattern, Position

＃搜索文字中的拍子
rindex文字，图案

参数：

text:要在其中搜索子字符串的字符串。
pat:要搜索的子字符串。
index:起始索引(由用户设置，默认情况下为零)。

返回值：
-1表示失败，否则最后出现的位置。

示例1:

#!/usr/bin/perl -w 
  
$pos = rindex("WelcomeToGeeksforGeeksWorld", "eks"); 
print "Position of eks: $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("WelcomeToGeeksforGeeksWorld",  
                          "eks", $pos - 3 ); 
print "Position of eks: $pos\n";

输出：

Position of eks: 19
Position of eks: 11

示例2:

#!/usr/bin/perl -w 
  
$pos = rindex("GeeksforGeeks", "eks"); 
print "Position of eek: $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("GeeksForGeeks", "eks", $pos - 2); 
print "Position of eek: $pos\n";

输出：

Position of eek: 10
Position of eek: 2

相关用法

注：本文由纯净天空筛选整理自Code_Mech大神的英文原创作品 Perl | rindex() Function。非经特殊声明，原始代码版权归原作者所有，本译文未经允许或授权，请勿转载或复制。