> if(ref($exception) || length($exception)) { ... }
According to perl documentation it would be better as:
if(! defined($exception) || ref($exception) || $exception ne '')
>From `perldoc -f eval':
If there is a syntax error or runtime error, or a `die' statement is
executed, an undefined value is returned by `eval', and `$@' is set
to the error message. If there was no error, `$@' is guaranteed to
be a null string.
So, undefined value in $@ is still an indicator of a problem.
Andrew.
> Andrew.
>
> P.S. Is there anybody alive in that list? I've got no responce so
> far..
>
> ______________________________________________________________________
> Perlunit-users mailing list [EMAIL PROTECTED]
> http://lists.sourceforge.net/lists/listinfo/perlunit-users
_______________________________________________
Perlunit-users mailing list
[EMAIL PROTECTED]
http://lists.sourceforge.net/lists/listinfo/perlunit-users
