I made the changes that you advised
use Test::More tests => 3;
#BEGIN { $| = 1; print "1..3\n";}
My error has changed slightly
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e"
"test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/1....# No tests run!
t/1....dubious
Test returned status 255 (wstat 65280, 0xff00)
DIED. FAILED tests 1-3
Failed 3/3 tests, 0.00% okay
Failed Test Stat Wstat Total Fail Failed List of Failed
-------------------------------------------------------------------------------
t/1.t 255 65280 3 3 100.00% 1-3
Failed 1/1 test scripts, 0.00% okay. 3/3 subtests failed, 0.00% okay.
make: 1254-004 The error code from the last command is 2.
Stop.
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of
Tom Phoenix
Sent: Saturday, September 23, 2006 4:31 PM
To: Johnson, Reginald (GTI)
Cc: beginners@perl.org
Subject: Re: writing a package
On 9/23/06, Johnson, Reginald (GTI) <[EMAIL PROTECTED]> wrote:
> t/1....Test header seen more than once!
> use Test::More tests => 1;
> BEGIN { $| = 1; print "1..3\n";}
Using Test::More outputs the test header line, so you don't need to
print "1..3\n"; but be sure to use the correct number of tests:
use Test::More tests => 3;
Cheers!
--Tom Phoenix
Stonehenge Perl Training
--------------------------------------------------------
If you are not an intended recipient of this e-mail, please notify the sender,
delete it and do not read, act upon, print, disclose, copy, retain or
redistribute it. Click here for important additional terms relating to this
e-mail. http://www.ml.com/email_terms/
--------------------------------------------------------
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
