On Thu, Nov 27, 2003 at 10:02:10PM +0200, Gabor Szabo wrote: > How am I going to test this ? > I came up with the following in the test script: > > > use Error qw(:try); > > > my $ex; > try { > f(); > } > catch MyError with { > $ex = shift; > }; > like($ex, qr/Bad thing happened/, 'successfully tested bad thing'); > > > Now $ex is global but I think I cannot test within the catch block.
Why not? catch MyError with { like( $ex, qr/Bad thing/ ); }; -- Michael G Schwern [EMAIL PROTECTED] http://www.pobox.com/~schwern/ Good tidings, my native American Indian friend! America will soon again be yours! Please accept 5th Avenue as an initial return!