Vyacheslav Karamov пишет:
> 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?
>
>
http://sanych.nnov.ru/?q=node/264
--
Александр Вайтехович
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
