0
ответов
Perl/Moose. Как я могу динамически выбирать конкретную реализацию метода?
Я написал простой класс на основе Moose под названием Document. Этот класс имеет два атрибута: имя и домашнюю страницу. Класс также должен предоставить метод с именем do_something(), который извлекает и возвращает...
вопрос задан: 8 June 2012 19:16
0
ответов
Могу ли я скопировать хеш, не сбрасывая его итератор «каждый»?
Я использую each для перебора хэша Perl: while (my ($key,$val) = each %hash) { ...
} Затем происходит что-то интересное, и я хочу распечатать хэш. Сначала я думаю что-то вроде:...
вопрос задан: 7 June 2012 22:47
0
ответов
Почему ключевое слово «пакет» иногда отделяется комментарием от имени пакета?
Анализируя исходники модулей CPAN, я вижу примерно следующее: ...
package # скрыть от PAUSE Try::Tiny::ScopeGuard;
... Очевидно, что это взято из Try::Tiny, но я встречал и такие...
вопрос задан: 6 June 2012 20:33
0
ответов
Имеет оператор yada-yada устарел?
Я не могу найти yada-yada, задокументированный в perldoc версии 5.16.0 perlop. Я также не вижу уведомления об устаревании в perldoc perl5160delta. Он все еще там?
вопрос задан: 6 June 2012 20:21
0
ответов
Perl/Soap lite: «Серверу не удалось обработать запрос. Ссылка на объект не указывает на экземпляр объекта»
. Я пытаюсь использовать уже существующий веб-сервис, и он отлично работает. Прочитав множество руководств и примеров, я, наконец, смог получить ответ от сервера: Сервер не смог ...
вопрос задан: 6 June 2012 17:08
0
ответов
Выборочное разбиение строки в Perl
Новое в Perl.Мне нужно разобрать отчет, который выглядит так: 2012-05-29@emaillocalpart@emaildomain@customerid@errormessage@messageid Я использовал: my @fields = split(/@/, $line, 6); В большинстве случаев это ...
вопрос задан: 6 June 2012 06:56
0
ответов
Perl: Почему eval '/(…)/' не устанавливает $1?
Если совпадение с регулярным выражением происходит внутри eval, изменения в переменных, связанных с перехватом ($1 и т. д.), не видны во внешней среде. Это ошибка? perlop и perlre, похоже, не ...
вопрос задан: 6 June 2012 06:24
0
ответов
perl сравнение элементов массивов и группировка
Я вернулся с другим вопросом. У меня есть список данных: 1 л DIELTQSPE H EVQLQESDAELVKPGASVKISCKASGYTFTDHE
2 л DIVLTQSPRVT H EVQLQQSGAELVKPGASIKDTY
3 A ALQLTQSPSSLSAS B RITLKESGPPLVKPTCS C ELDKWAN
4 ...
вопрос задан: 5 June 2012 13:29
0
ответов
Чтение вывода команды в массив Perl
Я хочу получить вывод команды в массив — вот так: my @output = `$cmd`; но кажется, что вывод команды не попадает в массив @output. Любая идея, где это происходит...
вопрос задан: 5 June 2012 11:20
0
ответов
Регулярное выражение для Unicode в верхнем регистре не соответствует «Ó»?
Кажется, что он не распознает букву Ó с ударением в верхнем регистре #!/usr/bin/env perl
использовать строгий;
использовать предупреждения;
используйте 5.14.0;
используйте utf8;
использовать функцию 'unicode_strings'; " SIMÓN " =~ /^\s+(\p{Upper}+)/u
вопрос задан: 5 June 2012 05:12
0
ответов
Как вызвать подпрограмму из пакета, зная имя пакета в Perl?
Учитывая переменную, содержащую строку, представляющую имя пакета, как мне вызвать конкретную подпрограмму пакета? Вот самое близкое, что я понял: package MyPackage; sub ...
вопрос задан: 5 June 2012 03:56
0
ответов
Планирование смертей в Perl-тестах [дубликат]
Есть ли способ написать тесты для Perl-вызовов, которые, как вы ожидаете, умрут? Я хотел бы убедиться, что некоторые вызовы будут умирать с плохо отформатированными входами. подпрограмма_a { мой $ arg = сдвиг; die if $arg eq ...
вопрос задан: 4 June 2012 16:09
0
ответов
Как проверить, открыт ли файл с помощью Perl?
Учитывая имя файла, как я могу определить, открыт ли файл в данный момент или используется? (Я говорю о файлах, а не об дескрипторах файлов Perl.) Обратите внимание, что я ищу универсальное...
вопрос задан: 4 June 2012 07:10
0
ответов
Как убить дерево процессов в Windows
Привет, у меня есть это дерево процессов: На скриншоте выше показано дерево процессов. В моем Perl-скрипте я знаю PID dscli. Я написал следующий код для уничтожения одного PID: use Win32::Process;
используйте ...
вопрос задан: 4 June 2012 04:18
0
ответов
Есть ли способ узнать методы экземпляра неизвестного класса в Perl
У меня есть программа на Perl, которая использует пакет что я получил из другого источника. Одна из функций метода возвращает объект неизвестного класса. Есть ли способ получить все возможные...
вопрос задан: 3 June 2012 10:21
0
ответов
Массив дескрипторов файлов
Я хотел выбрать, какие данные помещать в какой файл, в зависимости от индекса. Тем не менее, я, кажется, застрял со следующим. Я создал файлы, используя массив файловых дескрипторов: my @file_h;
my $...
вопрос задан: 3 June 2012 02:28
0
ответов
Правильная и переносимая нормализация имени файла utf8
Есть еще один вопрос по perl/utf8: Код: use 5.012;
используйте utf8;
использовать строгий;
использовать предупреждения;
использовать функцию qw(unicode_strings); использовать открытый qw(:std:utf8);
использовать Encode qw (кодировать декодировать);
вопрос задан: 2 June 2012 00:11
0
ответов
Как получить доступ к значению объекта JSON
У меня есть этот print STDERR Dumper $data:
$VAR1 = '{ "url_date":null, "footer":null,"id":"18", "authors":[ {"initials":"B.","last_name":"Лучший","имеет ":0,"id":12}, {"...
вопрос задан: 1 June 2012 16:39
0
ответов
Data::Dumper::Simple use
Просто интересно: есть ли способ сделать вторую форму Dumper в следующем фрагменте? используйте Modern::Perl;
используйте Data::Dumper::Simple; my $data = { name => 'jim', age => 21, updated => ...
вопрос задан: 1 June 2012 08:07
0
ответов
Статические локальные переменные в Perl
Мне нужен совет по лучшим практикам Perl. Я написал скрипт со сложным регулярным выражением: my $regex = qr/complicated/; # ... sub foo { # ... if (/$regex/) # ...
} где ...
вопрос задан: 1 June 2012 03:06
0
ответов
Двойные фигурные скобки в Perl
Я просматривал Perl-код в Интернете и наткнулся на нечто, чего раньше не видел, и не могу понять, что он делает (если что-то ). если($вар) {{ ...
}} Кто-нибудь знает, что такое двойные фигурные скобки...
вопрос задан: 31 May 2012 14:50
0
ответов
Как нормализовать аргументы функций Perl для мемоизации?
Как нормализовать список аргументов функции к строке, чтобы два списка аргументов преобразовывались в одну и ту же строку, если и только если они фактически эквивалентны? Алгоритм должен сравнивать встроенные хэши...
вопрос задан: 31 May 2012 14:11
0
ответов
реализация sha-256 на Perl
я очень стараюсь реализовать алгоритм sha-256. У меня проблемы с заполнением сообщения. для sha-256 вы должны добавить один бит в конце сообщения, до которого я дошел...
вопрос задан: 31 May 2012 09:26
0
ответов
MongoDB и Perl: поддержание порядка вставки
Я возился с библиотекой Perl MongoDB, и мне было трудно понять, как сделать что-то довольно простое. Как сохранить порядок полей данных при вставке? Мой код - это...
вопрос задан: 30 May 2012 14:40
0
ответов
Есть ли однострочный, чтобы получить первый элемент разделения?
Вместо записи: @holder = split /\./,"hello.world"; распечатать @держатель[0]; можно ли просто сделать однострочник, чтобы просто получить первый элемент разделения? Что-то вроде: print (split /\./,"hello....
вопрос задан: 29 May 2012 13:08
0
ответов
Как заставить perl grep выполнять захват регулярных выражений
Я пытаюсь захватить подстроку, используя захват регулярных выражений с помощью grep, получая содержимое (.*) в код ниже. @substring = grep /^test-results(.*)/,@$(array_reference); Это не...
вопрос задан: 29 May 2012 00:05
0
ответов
Есть ли что-нибудь лучше, чем библиотека kakasi для сортировки годзёон?
«Лучше» в первую очередь означает точность, но меня также интересуют любые другие критерии, по которым другие системы превосходят. Я пробовал Perl-связывание Text :: Kakasi на предмет корректности, правда, ограниченным образом ...
вопрос задан: 27 May 2012 23:40
0
ответов
Как явно уничтожить объект в Perl?
Допустим, у меня есть класс Perl с методом DESTROY. Этот метод используется для неявного освобождения внешнего ресурса, такого как дескриптор файла или транзакция базы данных. Дан экземпляр этого класса...
вопрос задан: 27 May 2012 07:00
0
ответов
Как читать и писать из канала в Perl?
Я новичок в Perl, так что извините за простой вопрос. Мне нужно изменить существующую программу Perl. Я хочу передать строку (которая может содержать несколько строк) через внешнюю программу и прочитать...
вопрос задан: 26 May 2012 19:26
0
ответов
Очистка огромной базы кода Perl
В настоящее время я работаю над веб-приложением, которому около 15 лет. Он содержит в основном perl-скрипты CGI с шаблонами HTML::Template. Он имеет более 12 000 файлов и около 260 МБ общего кода. Я...
вопрос задан: 25 May 2012 13:34