perl | Función index()

Esta función devuelve la posición de la primera aparición de una substring (o patrón) dada en una string (o texto). Podemos especificar la posición de inicio. Por defecto, busca desde el principio (es decir, desde el índice cero).

Sintaxis:
# Busca pat en el texto del índice dado
(text, pat, index)

# Busca pat en el
índice de texto (text, pat)

Parámetros:

• text : String en la que se buscará la substring.
• pat : Substring a buscar.
• index : índice de inicio (establecido por el usuario o toma cero por defecto).

Devuelve:
-1 en caso de error; de lo contrario, Posición de la string coincidente.

Ejemplo 1:

#!/usr/bin/perl
  
# String from which Substring 
# is to be searched 
$string = "Geeks are the best";
  
# Using index() to search for substring
$index = 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

Ejemplo 2:

#!/usr/bin/perl
  
# String from which Substring 
# is to be searched 
$string = "Geeks are the best";
  
# Defining the starting Index
$pos = 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";

Position of 'Geeks' in the string: -1

Aquí, en el segundo ejemplo, la posición se establece en ‘3’, es decir, el índice de inicio desde donde debe comenzar la búsqueda es desde la 3ª posición. Por lo tanto, la substring no se encuentra en la String.