perl/modules/W3C/LogValidator/t module-linkcheck.t,NONE,1.1

Update of /sources/public/perl/modules/W3C/LogValidator/t
In directory hutz:/tmp/cvs-serv32364/t

Added Files:
	module-linkcheck.t 
Log Message:
adding new test file


--- NEW FILE: module-linkcheck.t ---
#! /usr/bin/perl -w


use strict;
print "1..4\n";
use  W3C::LogValidator::LinkChecker;
print "ok 1\n";

my %config = ("verbose" => 2);
my $checker = W3C::LogValidator::LinkChecker->new(\%config);
print "ok 2\n";


$checker->uris('http://www.w3.org/QA/Tools/qa-dev');
print "ok 3\n";

my %result= $checker->process_list;
if (not %result) {print "not"}
print "ok 4\n";

Received on Tuesday, 30 August 2005 07:32:19 UTC