Que signifie la variable spéciale $ @ dans Perl?

Question

Je suis en train de comprendre le morceau de code suivant:

sub foo { 
    ... 
    if ($@) { 
     ... 
     die $@; 
    } 
} 

Answer 1

perldoc -f eval:

S'il y a une erreur de syntaxe ou une erreur d'exécution , ou une déclaration « mourir » est exécuté, une valeur indéfinie est renvoyée par "eval" et $ @ est définie sur le message d'erreur. S'il n'y avait pas d'erreur , $ @ est garanti être une chaîne nulle .

Voir également perldoc perlvar.

Answer 2

$@ est une variable magique contenant le message d'erreur de la dernière commande eval, le cas échéant.

Answer 3

La boucle if doit être précédée d'un eval pour pouvoir intercepter $ @.

Lors d'un eval(), $ @ est toujours défini en cas d'échec et effacé en cas de succès.

Si le code dans eval() ne compile pas, $ @ est mis à l'erreur de compilation.