4
голосов
5ответов
3285 просмотров

Как выполнить подвыбор с помощью DBIx :: Class?

Я начинаю с DBIx :: Class, и у меня есть подвыбор, который хотел бы быть в DBIx :: Class, но я запутался и не могу построить код. Мой выбор MySQL: Select name from tblCategory where id = ( Select id from tblCategory where id = ( Select id from tblRadio where name = "RFM" )...

1
голосов
3ответов
288 просмотров

Специальные тесты ОС для тестовых скриптов Perl

Есть ли более элегантный способ написать часть тестового сценария, которая зависит от операционной системы? См. код под строкой комментария. Фон: модуль Perl :: Tags создает файл тегов для VIM.В Win32 разделителем каталогов является «\», но в других ОС - «/».Модуль поддержки Perl в Vim...

2
голосов
1ответов
185 просмотров

Теги perl gVim под Win32 - следует ли использовать Perl :: Tags?

Я новичок в gVim, Perl и тестовых скриптах, так что надеюсь, это не глупый вопрос? Я успешно установил Perl :: Tags 0.26 под Linux и OS X, но получаю ошибки тестирования установки под WIN32 - также см. perl.cpan.testers Мои вопросы: (i) Нужен ли VIM Perl :: Tags, или я могу положиться...

6
голосов
2ответов
2146 просмотров

How do I override perl's compilation flags when building modules?

When building a Perl module ExtUtils::MakeMaker uses the flags defined in Config.pm (see perldoc Config) for values such as ccflags and ldflags. How do I override theses values (short of editing the Makefile.PL)? perl Makefile.PL ldflags=<options> does not seem to work. Context: I am ...

8
голосов
2ответов
2190 просмотров

How can I install or upgrade a CPAN module that is in the latest Perl, without installing the new Perl?

I'd like to install a Perl module (in this case, FindBin), but since it is included in the Perl 5.10.1 distribution, cpan wants to install Perl 5.10 for me. Is there a way of installing just the module via cpan? The only option that I can see is installing directly from source, which seems a bi...

10
голосов
4ответов
2843 просмотров

Should a Perl constructor return an undef or a "invalid" object?

Question: What is considered to be "Best practice" - and why - of handling errors in a constructor?. "Best Practice" can be a quote from Schwartz, or 50% of CPAN modules use it, etc...; but I'm happy with well reasoned opinion from anyone even if it explains why the common best practice is not...

11
голосов
1ответов
337 просмотров

Is there any Perl module that can keep me from adding `or die` to anything that can fail?

I'm writing code that runs all sorts of external commands as well as various filesystem commands that can fail. Is there any module that can save me the trouble of adding or die to anything that can fail? I'd like to be able to wrap the following in something so that instead of: mkdir $dirnam...

3
голосов
5ответов
542 просмотров

What happens in these Perl use lines?

I don't understand what happens here : use PAR { file => 'foo.par', fallback => 1 }; I think that's an anonymous hash. How is a module using it from the use line? Can you shed some light? EDIT: I'm not interested in the PAR module. I'm just interested in how that works behind the curtai...

0
голосов
2ответов
2510 просмотров

How do I refresh an array in a foreach loop?

I am writing a Perl script to do some mathematical operations on a hash. This hash contains the values as given in the sample below. I have written the code below. If I execute this code for an array value separately without using a foreach loop, the output is fine. But if I run this using a for...

2
голосов
4ответов
5541 просмотров

Using Perl, how can I create charts using values in a CSV file?

I am new to this and need a clue on how to do this task. I have a csv file with following sample data: site,type,2009-01-01,2009-01-02,.... X,A,12,10,... X,B,10,23,... Y,A,20,33,... Y,B,3,12,... and so on.... I want to create a perl script to read data from the csv file (as per the given user...

7
голосов
4ответов
3255 просмотров

How do I find all modules used in a Perl script and install them?

I have been given a few Perl scripts to deploy. What is the easiest way to find and install all modules used by these scripts? EDIT: From what I can find there are no conditional includes or includes in evals.

1
голосов
2ответов
335 просмотров

Why can't my Perl object find its skip() method, even though I can call it as a subroutine?

I'm working on a Perl module and whenever I call the skip() method I wrote in the following way: $cursor->skip(4); I get: Undefined subroutine &MyModule::Cursor::skip called at t/tester.pl line 24. (in cleanup) invalid object at t/tester.pl line 24. When I call it like: My...

5
голосов
1ответов
782 просмотров

How do you specify a package version in Perl?

I'm a bit confused by conflicting advice between pre-5.10.0 documents and the more recent version module. Perl Best Practices makes it pretty clear that version strings ('v1.0.3') are bad and one is supposed to specify a version as follows: use version; our $VERSION = qv('1.0.3'); but the ver...

0
голосов
2ответов
332 просмотров

Mapping values with Column header and row header

I have some files with below data. sample File 1: sitename1,2009-07-19,"A1",11975,17.23 sitename1,2009-07-19,"A2",11,0.02 sitename1,2009-07-20,"A1",2000,17.23 sitename1,2009-07-20,"A2",538,0.02 I want to map the values in column 4 with column 2 and 3 as shown below. Output required. Site,Ty...

66
голосов
10ответов
170115 просмотров

Как я могу проверить, установлен ли модуль Perl в моей системе из командной строки?

Я пытался проверить, установлен ли XML :: Simple в моей системе. perl -e 'while (<@INC>) { while (<$_/*.pm>) { print "$_\n"; } }' Вышеупомянутая однострочная строка использовалась для перечисления всех модулей, установленных в моей системе. Однако он не перечисляет модули XML....

24
голосов
3ответов
9485 просмотров

Как лучше всего обнаружить все подпрограммы модуля Perl?

Как лучше всего программно обнаружить все подпрограммы модуля Perl? Это может быть модуль, класс (без @EXPORT) или что-то среднее. Изменить. Похоже, все перечисленные ниже методы будут работать. Я бы, вероятно, использовал Class :: Sniff или Class :: Inspector в производстве. Однако ответ Лео...

4
голосов
6ответов
1513 просмотров

Как мне включить все / некоторые из «субмодулей» в Perl-скрипт?

Я начну с того, что у меня нет опыта в создании модулей Perl, так что извините, если я здесь далеко. Допустим, я создаю несколько модулей: foo::bar foo::bar::a foo::bar::b Поскольку я не знаю, как они называются, я называю модули a.pm и b.pm «подмодулями», поскольку они связаны с модул...

3
голосов
1ответов
1200 просмотров

Как отлаживать модуль mod_perl2 без перезапуска?

Среда: Apache / 2.2.11 (Win32) mod_apreq2-20051231 / 2.6.2-dev mod_perl / 2.0.4-dev Perl / v5.10.0 Ситуация очень похожа на то, что описано в этом сообщении со списком обсуждения , кроме win32. У меня это в httpd.conf: PerlModule Apache2::Reload PerlInitHandler Apache2::Reload PerlSet...

4
голосов
1ответов
241 просмотров

Нужен ли мне Exporter, если я собираюсь использовать чистый объектно-ориентированный объект на Perl?

В документации (Exporter и perlmodlib) говорится: Как правило, если модуль пытаясь быть объектно-ориентированным тогда ничего не экспортировать. Но тогда perlmodlib также говорит: Стандартные комплектные модули - это все ожидается вести себя в четко определенной способ от...

34
голосов
9ответов
27487 просмотров

Как сделать частные функции в модуле Perl?

Я работаю над небольшим модулем Perl, и по какой-то причине у меня был сценарий тестового драйвера, который использовал мой новый модуль, вызывающий одну из функций, которые, как я думал, будут закрытыми, и это было успешно. Я был удивлен, поэтому начал поиск в Google и не смог найти никакой док...

6
голосов
5ответов
288 просмотров

Должен ли я заменить свой файл utilities.pl на модуль utilities.pm?

В нашем продукте у нас есть большой файл утилит, который нам нужен (do) в начале многих наших файлов. Есть ли причина не превращать это в модуль? Например, вместо этого: do '../dbi_utilities.pl'; our ($db,$user,$pw,$attr); my $Data = DBI->connect($db,$user,$pw,$attr) or die "Could not co...

10
голосов
7ответов
12561 просмотров

Как я могу обновить Perl в Windows без потери модулей?

На работе я использую Perl 5.8.0 в Windows. Когда я впервые установил Perl, я зашел в CPAN, загрузил все исходные коды, внес несколько изменений (в файл .MAK (?) для поддержки потоков и т.п.) и сделал nmake/nmake test/nmake install Затем я постепенно скачал отдельные модули с CPAN и танцевал ...

21
голосов
11ответов
2087 просмотров

Какой фреймворк мне следует использовать для написания модулей?

Какая лучшая среда для написания модулей - ExtUtils :: MakeMaker (h2xs ) или Module :: Build ?

4
голосов
5ответов
416 просмотров

Какой самый быстрый способ определить полный URL-адрес из относительного URL-адреса (с учетом базового URL-адреса)

В настоящее время я использую модуль URI::URL для генерации полного URL-адреса из относительного URL-адреса; однако он работает не так быстро, как хотелось бы. Кто-нибудь знает другой способ сделать это быстрее?