You are looking at a very old, but free version of the course. If you are interesed the most recent version, check it out on the Perl Maven site.
Example 12-4. examples/www/static_lint_bad.t
#!/usr/bin/perl use strict; use warnings; use Test::More tests => 2; use Test::HTML::Lint; use LWP::Simple qw(get); my $html = get 'http://test_server/bad.html'; ok $html, 'There is a response'; html_ok $html, 'HTML OK';
$ perl static_lint_bad.t not ok 1 # Failed test (static_lint_bad.t at line 10) # Errors: # (3:13) </a> with no opening <a> # (8:1) <h1> at (3:1) is never closed 1..1 # Looks like you failed 1 tests of 1.