Función pos Perl

Descripción

Esta función se utiliza para encontrar el desplazamiento o la posición de la última subcadena coincidente. Si se especifica ESCALAR, devolverá el desplazamiento de la última coincidencia en esa variable escalar.

También puede asignar un valor a esta función (por ejemplo, pos ($ foo) = 20;) para cambiar el punto de inicio de la siguiente operación de coincidencia.

La compensación es un contador a partir de la posición cero.

Sintaxis

A continuación se muestra la sintaxis simple para esta función:

pos EXPR

pos

Valor devuelto

Esta función devuelve Integer en contexto Scalar y luego posiciona todas las coincidencias dentro de la expresión regular en el contexto List.

Ejemplo

A continuación se muestra el código de ejemplo que muestra su uso básico:

#!/usr/bin/perl -w

$name = "This is alpha beta gamma";
$name =~ m/alpha/g;

print("pos() ", pos($name), "\n");

Cuando se ejecuta el código anterior, produce el siguiente resultado:

pos() 13