######################### use Test::More tests => 4; BEGIN { use_ok('WebService::Validator::HTML::W3C::Fast') }; ######################### SKIP: { my $v; eval { $v = WebService::Validator::HTML::W3C::Fast->new(); }; skip("No validator available:$@", 3) if ($@); ok($v, "Launched a validator at " . $v->validator_uri()); ok($v->validate_markup(<<_HTML_), "Gets back results"); _HTML_ ok($v->is_valid(), "Validates valid file"); }