#! /usr/bin/perl

use strict;
use warnings;

use TAP::Harness;
use TAP::Formatter::HTML;

 my @tests = glob( 't/*.t' );
 # to use a custom formatter:
 my $fmt = TAP::Formatter::HTML->new;
 my $my_css;
 $fmt->css_uris([])->inline_css( $my_css )
     ->js_uris(['http://mysite.com/jquery.js', 'http://mysite.com/custom.js'])
     ->inline_js( '$(div.summary).hide()' );

 my $harness = TAP::Harness->new({ formatter => $fmt, merge => 1 });

 $fmt->output_file( '/tmp/foo.html' );