なぜevalを使用する前に$ @をローカライズする必要がありますか？私は<a href="http://perldoc.perl.org/functions/eval.html" rel="nofollow">eval</a>を使用する前にそれをローカライズする必要がある理由

Question

私は$@がグローバル変数であるという事実を認識してんだ、まだ私は理解することはできません。

例えば：

eval { SOME_FUNC_THAT_MAY_DIE(); }; 
if ($@) { 
    print "An error occured!\n"; 
} 

可能のみ私が考えることができることは、いくつかのシグナルハンドラが$@を読み込もうとすると同時にdieと呼ぶ場合、私はここで何が間違っていますか？

Answer 1

理由は、あなたの発信者の$@を踏んで回避することです。サブルーチンがグローバル変数を変更するのは失礼です（サブルーチンの目的の1つでない限り）。これは実際にはトップレベルコード（サブルーチン内ではない）の問題ではありません。

また、古いPerlの者に、オブジェクトの破壊時に呼び出されるevalを壊しうグローバル$@$@が最初にローカライズされていない限り（例外はevalブロックから送出されていましたので、オブジェクトが破壊された場合）。これはfixed in 5.14.0でしたが、多くの人々はまだ古いPerlを実行しています。

Answer 2

Try::Tinyモジュールのドキュメントは、根拠を与える（だけでなく、代替を提供する）：

あなたはevalのブロックを実行し、それが成功した場合、$ @を潜在的に現在中であるエラーを追い払ってくれる、クリアされます捕らえられた これは離れた場所でアクションを起こし、発信者がまだ処理していない可能性がある以前のエラーをクリアします。 この問題を回避するには、evalを呼び出す前に$ @を適切にローカライズする必要があります。 具体的には、$ @は評価の冒頭で詰まっており、死ぬ前に以前のエラーをキャプチャすることもできません（エラースタックを持つ例外オブジェクトを作成する場合など）。 evalを呼び出す前 local $@を言うために