Che cos'è $ @ in Perl?

Question

Ho uno script Perl che non riesco a capire.

for $i(@myarr) 
{ 
    #some stuff 
    eval { 
     #some stuff 
    }; 
    if($@) 
    { 
     print "*** $@ ****"; 
    } 
} 

1. Che cosa eval fare? È un comando Perl standard o solo un sub?
2. Qual è la variabile $ @? Attualmente sta stampando una stringa ma non so da dove provenga quella stringa.

Answer 1

Per aggiungere alla risposta di Suic, vedere il modulo English che consente di utilizzare più descrittivo $EVAL_ERROR anziché $@ ei Try::Tiny o TryCatch moduli che evitano le trappole comuni associati con l'utilizzo di eval per la gestione delle eccezioni. Inoltre, la prossima volta che ti interroghi su una funzione Perl, perldoc -f è tuo amico (come perldoc -f eval).

Answer 2

$@ L'errore di sintassi Perl o il messaggio di errore di routine dell'ultimo comando di eval, do-FILE o richiesta. Se impostato, la compilazione non è riuscita o la funzione die è stata eseguita all'interno del codice dell'eval. si prega di leggere questo documento http://perldoc.perl.org/perlvar.html