Função Perl substr

Descrição

Esta função retorna uma substring de EXPR, começando em OFFSET dentro da string. Se OFFSET for negativo, começa aquela quantidade de caracteres a partir do final da string. Se LEN for especificado, retorna aquele número de bytes, ou todos os bytes até o final da string, se não for especificado. Se LEN for negativo, deixa muitos caracteres fora do final da string.

Se REPLACEMENT for especificado, substitui a substring pela string REPLACEMENT.

Se você especificar uma substring que ultrapasse o final da string, ela retornará apenas o elemento válido da string original.

Sintaxe

A seguir está a sintaxe simples para esta função -

substr EXPR, OFFSET, LEN, REPLACEMENT

substr EXPR, OFFSET, LEN

substr EXPR, OFFSET

Valor de retorno

Esta função retorna string.

Exemplo

A seguir está o código de exemplo que mostra seu 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";

Quando o código acima é executado, ele produz o seguinte resultado -

Substring valuye is ay
Substring valuye is ka