very slow tests #10

Activity

1. kaoru commented on Mar 15, 2015

   

   kaoru

   on Mar 15, 2015

   Collaborator

   More actions

   Hi @mia

   If you send me through your patch I'll probably apply it.

   As you've probably seen I added the skip_all check for weird DNS issues:

   # Some weird ISPs or DNS providers take an address like http://i.dont.exist/
   # and resolve it to something "useful" such as
   # http://navigationshilfe1.t-online.de/dnserror?url=http://i.dont.exist/
   #
   # If that's happening then let's just give up on this test entirely.
   {
       my $ua = LWP::UserAgent->new;
       if ($ua->get('http://i.dont.exist/foo/bar')->is_success) {
           plan skip_all => 'http://i.dont.exist/foo/bar resolved to something!';
           exit;
       }
   }
   

   I've got two servers, one which triggers the problem and one which doesn't, but in both cases the test finishes very quickly.

   alex@kyon:~/Documents/Git/HTTP-Async$ prove -lv t/bad-hosts.t
   ...
   All tests successful.
   Files=1, Tests=9,  0 wallclock secs ( 0.01 usr  0.00 sys +  0.07 cusr  0.00 csys =  0.08 CPU)
   
   alex@yuzu:~/Documents/Git/HTTP-Async$ prove -lv t/bad-hosts.t
   ...
   skipped: http://i.dont.exist/foo/bar resolved to something!
   ...
   Files=1, Tests=0,  0 wallclock secs ( 0.04 usr  0.00 sys +  0.14 cusr  0.01 csys =  0.19 CPU)
   

   Maybe your DNS situation is even weirder than mine? :-)