Hi All!
I need to add unit tests to my project which I will start soon.
I'm using latest ActivePerl in Win32 (because I have to) and I installed
Test::Unit::Lite through ppm.bat.
But! When I tried to run example test:
#!/usr/bin/perl -w
use strict;
use warnings;
use File::Basename;
use File::Spec;
use Cwd;
BEGIN {
chdir dirname(__FILE__) or die "$!";
chdir '..' or die "$!";
unshift @INC, map { /(.*)/; $1 } split(/:/, $ENV{PERL5LIB}) if
${^TAINT};
my $cwd = ${^TAINT} ? do { local $_=getcwd; /(.*)/; $1 } : '.';
unshift @INC, File::Spec->catdir($cwd, 'inc');
unshift @INC, File::Spec->catdir($cwd, 'lib');
}
use Test::Unit::Lite;
local $SIG{__WARN__} = sub { require Carp; Carp::confess("Warning:
$_[0]") };
all_tests;
Warning: Can't stat t\tlib: No such file or directory
at C:/Perl/site/lib/Test/Unit/Lite.pm line 775
at C:\Slavik\Projects\PerlProjects\SuccessText.pl line 22
main::__ANON__('Can\'t stat t\tlib: No such file or directory\x{a}
at C:/Perl/sit...') called at C:/Perl/lib/Carp.pm line 46
Carp::carp('Can\'t stat t\tlib: No such file or directory\x{a}')
called at C:/Perl/lib/warnings.pm line 499
warnings::warnif() called at C:/Perl/lib/File/Find.pm line 712
File::Find::_find_opt('HASH(0x19e71c4)', 't\tlib') called at
C:/Perl/lib/File/Find.pm line 1286
File::Find::find('HASH(0x19e71c4)', 't\tlib') called at
C:/Perl/site/lib/Test/Unit/Lite.pm line 775
Test::Unit::Lite::AllTests::suite('Test::Unit::Lite::AllTests')
called at C:/Perl/site/lib/Test/Unit/Lite.pm line 680
Test::Unit::TestRunner::start('Test::Unit::TestRunner=HASH(0x229cd4)',
'Test::Unit::Lite::AllTests') called at
C:/Perl/site/lib/Test/Unit/Lite.pm line 116
Test::Unit::Lite::all_tests() called at
C:\Slavik\Projects\PerlProjects\SuccessText.pl line 24
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
