Vyacheslav Karamov пишет:
> Привет всем!
>
> Никогда не пользовался юнит-тестами, а тут понадобилось их использовать
> в новом проекте на Perl.
> Perl я только изучаю, но с тестами определиться нужно уже сейчас.
> Пробовал через ppm.bat ставить
> на оффтопиковый Perl модуль Unit::Test::Lite, но там какие-то проблемы:
>
> #!/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
>
>
>
> А сейчас хочу попробовать какой-нибудь фреймворк в убунте. Может
> посоветуете?
>
> P.S. Вопрос на [EMAIL PROTECTED] так и остался без ответа.
>
>
$ aptitude search ~dperl~dtest~dunit
[cut]
p libtest-unit-perl - a unit
testing framework for Perl
[cut]
не оно?
--
Александр Вайтехович
www: http://sanych.nnov.ru
e-mail: ssanych[at]gmail[dot]com
icq: 168712946
--
ubuntu-ru mailing list
ubuntu-ru@lists.ubuntu.com
https://lists.ubuntu.com/mailman/listinfo/ubuntu-ru
