Perl index() 函数

这个函数返回一个字符串（或文本）中第一次出现的子串（或模式）的位置。我们可以指定起始位置。默认情况下，它从头开始搜索（即从索引0开始）。

语法:

从给定的索引开始搜索文本中的pat

index(text, pat, index)

在文本中搜索pat

index(text, pat)

参数

text : 要搜索子串的字符串。
pat : 要搜索的子串。
index：起始索引（由用户设置，或者默认为0）。

返回：

-1，否则返回匹配字符串的位置。

例1 :

#!/usr/bin/perl
  
# String from which Substring 
# is to be searched 
string = "Geeks are the best";
  
# Using index() to search for substringindex = index (string, 'the');
  
# Printing the position of the substring
print "Position of 'the' in the string:index\n";

输出。

Position of 'the' in the string: 10

例2:

#!/usr/bin/perl
  
# String from which Substring 
# is to be searched 
string = "Geeks are the best";
  
# Defining the starting Indexpos = 3;
  
# Using index() to search for substring
index = index (string, 'Geeks', pos);
  
# Printing the position of the substring
print "Position of 'Geeks' in the string:index\n";