If you'd like try/catch semantics, they are implemented in Error.pm. Of
course you could do it yourself too:
sub try (&$) {
my($try, $catch) = @_;
eval { &$try };
if ($@) {
local $_ = $@;
&$catch;
}
}
sub catch (&) { shift };
# exam
Thanks, yes: that's what I've always done,
just need something more refined.
Ta
lee
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users
On Fri, 28 Sep 2001, Lee Goddard wrote:
> Just found a need for exception handling on a big
> live project with an potentially nasty PM. Does anyone
> have any experience of the Exception modules? Any good?
> Bad? Better ideas?
>
> Your input would be much appreciated!
Have you tried wra