Función substr de Perl

Descripción

Esta función devuelve una subcadena de EXPR, comenzando en OFFSET dentro de la cadena. Si OFFSET es negativo, comienza esa cantidad de caracteres desde el final de la cadena. Si se especifica LEN, devuelve ese número de bytes, o todos los bytes hasta el final de la cadena si no se especifica. Si LEN es negativo, deja esa cantidad de caracteres fuera del final de la cadena.

Si se especifica REPLACEMENT, reemplaza la subcadena con la cadena REPLACEMENT.

Si especifica una subcadena que pasa más allá del final de la cadena, devuelve solo el elemento válido de la cadena original.

Sintaxis

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

substr EXPR, OFFSET, LEN, REPLACEMENT

substr EXPR, OFFSET, LEN

substr EXPR, OFFSET

Valor devuelto

Esta función devuelve una cadena.

Ejemplo

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

#!/usr/bin/perl -w

$temp = substr("okay", 2);
print "Substring valuye is $temp\n";

$temp = substr("okay", 1,2);
print "Substring valuye is $temp\n";

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

Substring valuye is ay
Substring valuye is ka