on 9/4/02 10:16 pm, Michael G Schwern at [EMAIL PROTECTED] wrote:
[snip]
> You probably want to guarantee that $@ will be how it died so you can do:
>
> dies_ok { div(1,0) } 'div by zero';
> like( $@, qr/^Illegal division by zero/ );
>
> Even though you can use throws_ok(), the dies_ok() + $@ combo is more
> flexible more processing than just a regex needs to be done on $@.
[snip]
Good idea. Done.
Fixed a couple of other silly mistakes. New code at
<http://www.quietstars.com/perl/> if anybody wants to play.
Cheers,
Adrian
--
e. [EMAIL PROTECTED], t. 01929 550720, f. 0870 131 3033
