perl 重定义异常行为 error 和 warn 的原理

rrrrrrrr8

在Web开发中我用过 use CGI::Carp qw(fatalsToBrowser);
谁能简单说说，怎样捕获程序中的所有die出来的异常，然后按着自已想法去处理。
比如如果在wxperl中我想popup a error window等。
就想设JSP中的ERRORPAGE handle一样。

兰花仙子

就是重定义下$SIG{__DIE__}和$SIG{__WARN__}信号句柄而已，对应的是匿名函数。

rrrrrrrr8

回复 2# 兰花仙子


    谢谢！

bikong0411

学习了~

斯文牛氓

试试Try::Tiny;

rrrrrrrr8

回复 5# 斯文牛氓
Thanks
这种与java很像。