回答編集履歴

  で、C++やJavaでのtry～catch、Pythonでのtry～except、Rubyでのbegin～rescueのような例外捕捉を行うのが、Perlの場合evalということになります。

  `eval{main()};`のように、evalブロックで囲んでいる場合、その中の処理で例外がdieにより発生すると、異常終了ではなく、例外の内容が特殊変数`$@`に保存されます。つまり、このケースでは"send() fail:"という文字列が`$@`に入っていることになりますので、別途 print や say で出力すればコンソール等で確認できます。