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