Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re: Re: The Joy of Test

by Ovid (Cardinal)
on Apr 11, 2002 at 19:53 UTC ( #158411=note: print w/replies, xml ) Need Help??

in reply to Re: The Joy of Test
in thread The Joy of Test

gmax asked if there was a "ready-to-use idiom to make a script by assembling several small ones together?"

You can look at the documentation for Test::Harness. This module will allow you to run tests from several different sources and will return results based upon their output to STDOUT. Here's a script from the docs to have Test::Harness test itself, using all test scripts in the "t" directory.

$ cd ~/src/devel/Test-Harness $ perl -Mblib -e 'use Test::Harness qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t/*.t Using /home/schwern/src/devel/Test-Harness/blib t/base..............ok t/nonumbers.........ok t/ok................ok t/test-harness......ok All tests successful. Files=4, Tests=24, 2 wallclock secs ( 0.61 cusr + 0.41 csys = 1.02 C +PU)


Join the Perlmonks Setiathome Group or just click on the the link and check out our stats.

Replies are listed 'Best First'.
Re: Re: Re: The Joy of Test
by tachyon (Chancellor) on Apr 13, 2002 at 15:16 UTC

    using all test scripts in the "t" directory.

    Actually as you can see from the header output:

    $verbose=0; runtests @ARGV;' t/*.t <----

    only scripts named *.t will get run. This is usefull as you can stop a test script in the t/ dir running simply by renaming it say widget.test




Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://158411]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (6)
As of 2018-06-22 00:06 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (120 votes). Check out past polls.