Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask

Help on TAP::Formatter::HTML

by Rahul6990 (Beadle)
on Apr 09, 2013 at 09:55 UTC ( #1027694=perlquestion: print w/replies, xml ) Need Help??
Rahul6990 has asked for the wisdom of the Perl Monks concerning the following question:

Hi Perl Monks,

My assignment is to create TAPs report I have being following the below link:

In that link I am using the code:

my $fmt = TAP::Formatter::HTML->new; $fmt->css_uris([])->inline_css( $my_css ) ->js_uris(['', ' +om.js']) ->inline_js( '$(div.summary).hide()' );

But I did not get with what value shall I need to initialize $my_css, so get the HTML op in the desired.

Next problem is that I don't know how to write test files. Below is the code that I have written so far

For main script

use TAP::Formatter::HTML; use TAP::Harness; use accessors; use strict; my $fmt = TAP::Formatter::HTML->new; my @tests = glob('*.t'); my $my_css; $fmt->css_uris([])->inline_css( $my_css ) ->js_uris(['', ' +om.js']) ->inline_js( '$(div.summary).hide()' ); my $harness = TAP::Harness->new( { formatter => $fmt, merge => 1 } ); $fmt->output_file('output.html'); $harness->runtests('simple.t');

For Test File(simple.t)

print "\nHello world";

Replies are listed 'Best First'.
Re: Help on TAP::Formatter::HTML
by Anonymous Monk on Apr 09, 2013 at 10:09 UTC