Re^2: Aggregating "ok" messages within an aggregating script

Unfortunately, that's not what I need.

There is no $file (no .t files to test)

Take that script your wrote, add a bunch of 'ok' tests into it, have no $file targets, and have the script summarize its OWN 'ok' messages... that's what I need.

Comment on Re^2: Aggregating "ok" messages within an aggregating script

Replies are listed 'Best First'.
Re^3: Aggregating "ok" messages within an aggregating script by remiah (Hermit) on Jan 21, 2011 at 03:12 UTC
I am not experienced with test, separated test scripts seems popular. So I am not sure what I think is good or bad. How about using pod comment like Test::inline? And use prove command of Test::Harness? I mean like this. `... contents of module =test begin ok(1==1, "1 test") ok(2==2, "2 test") =test end` [download] And grep this test.pl and test. `> cat test.pl \|grep -v "^test" > testfile > perl testfile; prove testfile` [download] regards	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^3: Aggregating "ok" messages within an aggregating script
by remiah (Hermit) on Jan 21, 2011 at 03:12 UTC

... contents of module
=test begin
ok(1==1, "1 test")
ok(2==2, "2 test")
=test end
[download]

> cat test.pl |grep -v "^test" > testfile
> perl testfile; prove testfile
[download]

[reply]
[d/l]
[select]