Fonction définie par Perl

La description

Cette fonction renvoie true si EXPR a une valeur autre que la valeur undef ou vérifie la valeur de $ _ si EXPR n'est pas spécifié. Cela peut être utilisé avec de nombreuses fonctions pour détecter un échec de fonctionnement, car elles retournent undef en cas de problème. Un simple test booléen ne fait pas la différence entre faux, zéro, une chaîne vide ou la chaîne .0., Qui sont tous également faux.

Si EXPR est une fonction ou une référence de fonction, alors il renvoie true si la fonction a été définie. Lorsqu'il est utilisé avec des tableaux entiers et des hachages, il ne produira pas toujours des résultats intuitifs. Si un élément de hachage est spécifié, il renvoie true si la valeur correspondante a été définie, mais ne détermine pas si la clé spécifiée existe dans le hachage.

Syntaxe

Voici la syntaxe simple de cette fonction -

defined EXPR

defined

Valeur de retour

Cette fonction renvoie 0 si EXPR contient undef et 1 si EXPR contient une valeur ou une référence valide.

Exemple

Voici l'exemple de code montrant son utilisation de base -

#!/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";
}

Lorsque le code ci-dessus est exécuté, il produit le résultat suivant -

This is defined
var2 is not defined