San_Sanych пишет:
> 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]
> не оно?
>
>
Оно. Спасибо!
Ещё вопрос: а строка "~dperl~dtest~dunit " как расшифровуется? Что за ~d?
--
ubuntu-ru mailing list
[email protected]
https://lists.ubuntu.com/mailman/listinfo/ubuntu-ru
