- HTML::Lint
- Test::HTML::Lint
Checking good HTML
examples/www/static_lint.t
#!/usr/bin/perl use strict; use warnings; use Test::More tests => 2; use Test::HTML::Lint; use LWP::Simple qw(get); my $home = get 'http://localhost:8080/'; ok $home, 'There is a response'; html_ok $home, 'HTML OK';
$ perl static_lint.t 1..2 ok 1 - There is a response ok 2 - HTML OK