On Sun, Oct 21, 2001 at 02:44:50PM -0600, chromatic wrote:
> Is this valuable for anyone? I could probably turn something like
> this into an article for perl.com or the Perl Journal or even
> use.perl, if anyone could sweet-talk an editor or thinks gonzo
> testing ought to be promoted.
This sort of thing isn't really quite as gonzo as it sounds. I was
talking to a TCL test engineer at TPC 5, they use the "let's put a
dummy function in the place of the troublesome real one" trick, too.
The magic of symbol table hacking, ahhhh.
They actually take it one step further. They insert functions that
deliberately fail into working code to see if it gracefully handles
failure of, say, losing a database connection, or the network going
down, or a necessary file disappearing.
> Schwern thinks it's clever, so it can't be all bad.
I still think microwavable popcorn is pretty clever, so gauge
accordingly. ;)
> --- /dev/null Thu Aug 30 03:54:37 2001
> +++ lib/Net/Netrc.t Sun Oct 21 14:35:50 2001
> @@ -0,0 +1,130 @@
> +#!./perl
> +
> +BEGIN {
> + chdir 't' if -d 't';
> + @INC = '../lib';
> +}
> +
> +use strict;
> +use Cwd;
> +use Test::More tests => 19;
> +
> +# for testing _readrc
> +$ENV{HOME} = Cwd::cwd();
VMS alert! In VMS-land, a process can modify it's parent's
environment. localizing that change should do it.
--
Michael G. Schwern <[EMAIL PROTECTED]> http://www.pobox.com/~schwern/
Perl6 Quality Assurance <[EMAIL PROTECTED]> Kwalitee Is Job One
<GuRuThuG> make a channel called #Perl, and infest it with joking and
fun.... it doesnt make alot of sense.
