0
ответов

В чем разница между модулем и дистрибутивом на CPAN?

Я просто сравнивал числа для разных «архивных сетей», таких как CPAN, CTAN, rubygems.org и т. д. CPAN отображает два очень разных числа:105 774 модуля. 24 657 дистрибутивов. Поскольку я не Perl...
вопрос задан: 16 April 2012 20:56
0
ответов

Регулярное выражение Perl для соответствия IP-адресу

Я написал этот код, но он не работает. Может ли кто-нибудь указать на проблему? дополнительное совпадение_ip(){ my $ip = "IP-адрес 216.108.225.236:60099"; if($ip =~/(\d{1-3}\.\d{1-3}\.\d{1-3}\.\d{ 1-3}...
вопрос задан: 16 April 2012 03:55
0
ответов

Как удалить одну строку из файла с помощью Perl?

Я пытаюсь удалить одну строку из текстового файла. Вместо этого то, что у меня есть, стирает весь файл. Может ли кто-нибудь указать на ошибку? removeReservation ("джон" ); sub removeTime (){ my $name = shift;...
вопрос задан: 16 April 2012 00:56
0
ответов

Есть ли что-нибудь в базовом Perl для автоматического удаления строк из оператора «<>»?

Одной из небольших неприятностей, с которыми я сталкиваюсь при написании кода на Perl, является необходимость не забывать пережевывать строку, которую вы читаете из ввода. Да, после многих лет программирования почти автоматически приходится помнить об это
вопрос задан: 14 April 2012 15:28
0
ответов

Как загрузить файл с помощью Mojolicious?

Я пробовал веб-фреймворк Mojolicious на основе perl. И я попытался разработать полноценное приложение вместо Lite. Проблема, с которой я столкнулся, заключается в том, что я пытаюсь загрузить файлы на сервер, ...
вопрос задан: 14 April 2012 10:44
0
ответов

Система очередей для Perl

Я работаю над проектом Perl, которому нужна очередь сообщений FIFO для распределения задач между несколькими процессами на одной машине (UNIX). Размер очереди может вырасти до 1 млн заданий. Я пробовал IPC::...
вопрос задан: 13 April 2012 14:23
0
ответов

Perl модифицирует ссылку на хеш в подпрограмме

У меня возникли проблемы с пониманием ссылок на хеш и изменением хэша вместо того, чтобы вернуть его. Я хочу написать подпрограмму, которая будет возвращать значение из хэша, а также изменять...
вопрос задан: 13 April 2012 05:22
0
ответов

Получить значение узла с помощью модуля XML::XPath в Perl

Я использую приведенный ниже код для получения значения узла из XML-файла:use XML::XPath; использовать XML::XPath::XMLParser; мой $pt1 = XML::XPath->новое(имя файла => 'test1.xml'); my $nodeset = $pt1->find('/...
вопрос задан: 12 April 2012 10:23
0
ответов

Массив POST в LWP:публикуется только первая запись

Вот часть кода, и я пытаюсь отправить весь массив POST с помощью LWP, но сервер получает только первую строку массива (0 index), в то время как другие не отправляются на сервер, пожалуйста, объясните, что я делаю...
вопрос задан: 11 April 2012 21:57
0
ответов

SQL -как выбрать одну строку за раз?

Я хотел бы выполнить определенный выбор, который (как я тестировал в sqldeveloper), будет извлекать очень большой объем данных (~350 000 строк). В конце концов, я хотел бы записать эти строки в файл. Я...
вопрос задан: 11 April 2012 07:45
0
ответов

печатать только строки с определенным столбцом, а не *

У меня есть программа, которая отправляет текст на стандартный вывод. Но я хочу сохранить только те строки, где пятый столбец не «*». Это символ звездочки, а не выражение регулярного выражения, которое ловит все. Я не могу ...
вопрос задан: 11 April 2012 01:33
0
ответов

Нужно ли включать строку #!/usr/bin/perl в сценарий Perl в Windows?

Я только что установил ActivePerl в Windows и начал изучать Perl. В книге, которую я читаю, первый пример кода таков: #!/usr/bin/perl use 5.010; сказать «Привет, мир!»; Так как я на...
вопрос задан: 10 April 2012 22:58
0
ответов

Замена только до N совпадений в строке

Как в Perl написать регулярное выражение, которое заменяет только до N совпадений в строке? То есть я ищу золотую середину между s/aa/bb/; и с/аа/бб/г;. Я хочу разрешить несколько...
вопрос задан: 10 April 2012 19:47
0
ответов

Как я могу передать массив из perl во встроенный C++?

Не могу понять, баг это или что. Следующий код работает с Inline::C, но не с Inline::CPP #!/usr/bin/perl использовать предупреждения; используйте встроенный C; мой @массив = (1..10); print findAvLen(\@array), "\n"; ...
вопрос задан: 10 April 2012 16:05
0
ответов

Perl в JSON с парами ключ/значение

Я пытаюсь вывести некоторые данные из Perl в JSON. Я могу сделать простой вывод, но хотел бы лучше его структурировать. У меня есть массив с идентификатором, временем начала и временем окончания. Это код, который я...
вопрос задан: 10 April 2012 15:40
0
ответов

Явная ошибка пакета в Perl

Я пытаюсь разобрать строку и поместить части в массив, а затем назначить компоненты массива новым переменным. Я сделал это точно так же в своем коде, и он работает, но теперь он терпит неудачу, ...
вопрос задан: 5 April 2012 17:40
0
ответов

Почему IPC::Open3 блокируется?

Я просмотрел документацию open3, и вот часть, которую я не смог понять: Если вы попытаетесь прочитать из дочернего модуля записи stdout и их модуля записи stderr, у вас возникнут проблемы с...
вопрос задан: 5 April 2012 15:11
0
ответов

Perl Inheritance — кто вызывает родительский класс

У меня возникла ситуация, когда мне нужно найти вызывающую сторону пакета, и мой код выглядит примерно так: Inherited.pm: package Inherited; наш @ISA = qw(BaseClass); подновый { СУПЕР:: новый (); } ...
вопрос задан: 5 April 2012 05:21
0
ответов

Печатать уникальные строки файла размером 10 ГБ

У меня есть файл размером 10 ГБ с 200 миллионами строк. Мне нужно получить уникальные строки этого файла. Мой код: в то время как (<>) { chomp; $tmp{$_}=1; } #print... У меня всего 2 ГБ памяти. Как мне решить...
вопрос задан: 5 April 2012 02:32
0
ответов

Зачем перекомпоновывать Unicode (NFC) на выходе?

TomC рекомендует разлагать символы Юникода на входе и перекомпоновывать на выходе (http://www.perl.com/pub/2012/04/perl-unicode-cookbook-always-decompose-and-recompose. html). Первый ...
вопрос задан: 4 April 2012 13:45
0
ответов

Изменение массива в подпрограмме

У меня есть код, который работает не так, как я ожидаю, и я был бы признателен за помощь в выяснении того, как заставить его работать так, как я ожидаю. Я хотел бы использовать подпрограмму для изменения входного массива. Я...
вопрос задан: 3 April 2012 14:53
0
ответов

Могу ли я одновременно использовать Strawberry Perl и ActiveState Perl на одном компьютере?

Я не новичок в Perl, но эта проблема меня немного смущает. Однажды я удалил свой ActiveState Perl, и все установленные модули были потеряны. Так что теперь я очень осторожен с таким вопросом. Из-за...
вопрос задан: 2 April 2012 21:15
0
ответов

Должны ли мы в сценариях Perl использовать команды оболочки или вызывать функции Perl, имитирующие операции оболочки?

Я хочу узнать о передовом опыте. Предположим, я хочу получить содержимое некоторой строки файла. Я могу использовать однострочную команду оболочки, чтобы получить ответ, или написать подпрограмму, как показано в коде...
вопрос задан: 1 April 2012 18:32
0
ответов

Как сделать так, чтобы GD::Graph не записывала последнюю метку X и не перезаписывала другие метки?

Я установил x_label_skip для пропуска меток, но он по-прежнему пытается отобразить самую последнюю метку, перезаписывая другую метку, и выглядит беспорядочно. Он не должен писать последнюю этикетку. Должно быть ...
вопрос задан: 1 April 2012 07:43
0
ответов

Как я могу получить первый и последний день месяца с помощью Perl& #39;s DateTime?

Есть ли способ определить первый день месяца (min day )и последний день месяца (max day ), учитывая месяц в качестве входных данных, используя DateTime в Perl ? До сих пор я разобрался, как пройти в первый...
вопрос задан: 31 March 2012 17:56
0
ответов

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

Скажем, у меня есть подпрограмма, которая получает два аргумента: спецификацию кодировки и путь к файлу. Затем подсистема использует эту информацию для открытия файла для чтения, как показано ниже, урезанного до самого необходимого:...
вопрос задан: 31 March 2012 14:27
0
ответов

Как выбрать конкретный элемент из декартова произведения, не вычисляя все остальные элементы

Я в основном убежден, что есть ответ на эту проблему, но я не могу понять, как это сделать. Допустим, у меня есть три множества:A = ['foo', 'bar', 'baz', 'bah'] B = [ 'wibble', '...
вопрос задан: 30 March 2012 14:33
0
ответов

Операторы сравнения Perl и строковые «числа»

В последнее время я много работаю с Perl, но все еще не знаю, как <,>,>=,=< , ne,gt и т.д.. в строковых "числах", под "числом" я имею в виду что-то вроде: "1.4.5.6.7.8.0" поправьте меня, если я'...
вопрос задан: 30 March 2012 11:16
0
ответов

Как получать ошибки Perl-скриптов в журнале ошибок nginx (Nginx с FCGIwrap)

Я только что установил fcgiwrap и spawn-fcgi, чтобы иметь возможность использовать Perl-скрипты в nginx. Я добавил что-то вроде этого в конфигурацию своего сайта: location ~ \.pl$ { gzip off; fastcgi_pass unix:/var/run/...
вопрос задан: 30 March 2012 10:33
0
ответов

Получить шаблоны в одном файле из другого, используя ack или awk или лучший способ, чем grep?

Есть ли способ получить шаблоны в одном файле (список шаблонов) из другого файла, используя ack в качестве опции -f в grep? Я вижу, что в ack есть опция -f, но с -f в grep все по-другому. ...
вопрос задан: 30 March 2012 05:25