--- AnyEvent/t/68_poe_07_io.t 2009/07/09 22:49:18 1.2 +++ AnyEvent/t/68_poe_07_io.t 2009/07/18 00:05:29 1.3 @@ -1,9 +1,8 @@ -$|=1; -BEGIN { print "1..18\n" } - use AnyEvent; use AnyEvent::Util; -use AnyEvent::Impl::POE; $^W = 0; +BEGIN { eval q{use AnyEvent::Impl::POE;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::POE not found}), exit 0) } $^W = 0; + +$| = 1; print "1..18\n"; print "ok 1\n";