Função definida por Perl

Descrição

Esta função retorna verdadeiro se EXPR tiver um valor diferente do valor undef ou verifica o valor de $ _ se EXPR não for especificado. Pode ser usado com várias funções para detectar uma falha na operação, pois retornam undef se houver um problema. Um teste booleano simples não diferencia entre falso, zero, uma string vazia ou a string .0., Que são igualmente falsas.

Se EXPR for uma função ou referência de função, ele retornará verdadeiro se a função tiver sido definida. Quando usado com arrays e hashes inteiros, nem sempre produzirá resultados intuitivos. Se um elemento hash for especificado, ele retornará verdadeiro se o valor correspondente tiver sido definido, mas não determina se a chave especificada existe no hash.

Sintaxe

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

defined EXPR

defined

Valor de retorno

Esta função retorna 0 se EXPR contém undef e 1 se EXPR contém um valor ou referência válida.

Exemplo

A seguir está o código de exemplo que mostra seu uso básico -

#!/usr/bin/perl

$var1 = "This is defined";

if( defined($var1) ) {
   print "$var1\n";
}
if( defined($var2) ) {
   print "var2 is also defined\n";
} else {
   print "var2 is not defined\n";
}

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

This is defined
var2 is not defined