0
ответов
Расшифровать обфусцированный скрипт Perl
На моем сервере возникли проблемы со спамом, и, обнаружив и удалив некоторые скрипты Perl и PHP, я решил проверить, что они на самом деле делают, хотя я старший программист PHP. небольшой опыт ...
вопрос задан: 6 March 2012 20:54
0
ответов
Сохранение объекта в БД и его извлечение
У меня есть объект perl (ссылка на массив ссылок), как показано ниже: my $a = [ [$a, $ ab, $c], [$a, $b, $c]]; и нужно сохранить его в БД, а затем получить его. Может ли кто-нибудь предложить хороший...
вопрос задан: 6 March 2012 15:27
0
ответов
Как перезаписать функцию, используемую в методе модуля?
#!/usr/bin/env perl
использовать предупреждения;
используйте 5.012;
используйте utf8; используйте WWW::Mechanize::Cached;
использовать Some::Module qw(some_method); мой $url = '...';
мой $result = some_method($url); Метод some_method() использует сам
вопрос задан: 6 March 2012 11:51
0
ответов
Как мне улучшить процесс развертывания моего Perl-приложения?
Я разрабатываю и поддерживаю набор биоинформатических приложений из 50+. scripts и процесс его развертывания - беспорядок: весь пакет находится в одном большом репозитории git. У него много зависимостей от CPAN и десятки...
вопрос задан: 5 March 2012 23:48
0
ответов
Сравнение двух строк Unicode с perl
Когда я запускаю следующий код, он не входит в секция "сделай что-нибудь здесь": my $a ='µ╫P[┐╬♣3▀═<+·1╪מ└╖"ª';
my $b ='µ╫P[┐╬♣3▀═<+·1╪מ└╖"ª'; if ($a ne $b) { # сделать что-нибудь здесь } ...
вопрос задан: 5 March 2012 23:38
0
ответов
Сортировка ссылки на массив хэшей
У меня возникли проблемы с сортировкой ссылки на массив хэшей на основе значения в хэше, структура данных выглядит следующим образом: my %usera = (name => 'tom', вес => 10);
my %userb = (name ...
вопрос задан: 5 March 2012 15:03
0
ответов
Есть ли самый простой способ собрать пакет perl
Я написал несколько библиотек Perl (.pm) и Perlscripts (.pl) для Ubuntu, и мне нужно раздать их своим коллегам в моем офисе. Для этих скриптов и библиотек требуются сторонние библиотеки. Я хочу сделать ...
вопрос задан: 5 March 2012 12:16
0
ответов
распознавание «типа» хэш-ключей
Я бы хотел использовать «скомпилированное регулярное выражение» (я имею в виду: выражение в форме qr / .. /) как ключ к хэш-структуре. Чтобы различать константные строки и эти регулярные выражения при повторении хеш-ключей, ...
вопрос задан: 5 March 2012 11:36
0
ответов
Ошибка при открытии дескриптора файла
У меня есть только начал работать с Perl, я только на начальном уровне, и у меня были проблемы с открытием файловых дескрипторов. Вот код: #!/usr/bin/perl -w $proteinfilename = 'peptide';
...
вопрос задан: 5 March 2012 08:54
0
ответов
Почему «использовать namespace::autoclean» предпочтительнее, чем «без Moose»?
Часто встречающаяся рекомендация по передовому опыту в отношении Moose выглядит следующим образом: «Бит use namespace::autoclean — это просто хорошая гигиена кода, поскольку он удаляет импортированные символы из вашего класса...
вопрос задан: 4 March 2012 21:41
0
ответов
Сравнение и проверка структур данных
Мне нужно проверить хэш-ссылки, подобные этому {foo => 65, bar => 20, baz => 15 } по ссылке на массив хешрейфов, выражающих такие условия [{foo => {"<=" => 75}}, {bar = & ...
вопрос задан: 4 March 2012 19:26
0
ответов
Как это лучше написать на Perl
Учитывая большой входной файл, который выглядит так: 26.02.2012 08:54:38 Ошибка :java.sql.Exception
26.02.2012 08:54:48 Ошибка: java.sql.Exception
26.02.2012 08:56:05 Ошибка: java.sql.Exception
26.02.2012 08:57:...
вопрос задан: 3 March 2012 17:01
0
ответов
Подсчет количества вхождений одной строки в другую (Perl)
Какой самый быстрый способ подсчитать, сколько раз одна строка встречается в более крупной? Лучше всего было бы заменить все экземпляры этой строки ничем, вычислить разницу ...
вопрос задан: 3 March 2012 16:55
0
ответов
Почему я не могу назначить IP для LWP::UserAgent?
У меня есть сценарий, который должен выполнять несколько вызовов службы с разными IP-адресами. Мой код работает, когда я не устанавливаю IP для своих вызовов, я написал функцию для назначения IP объекту...
вопрос задан: 2 March 2012 23:11
0
ответов
удалить символические ссылки Windows в скрипте Perl?
Предположим, я создаю несколько символических ссылок Windows, например: rd / s / q source withlink linkdir
исходный код mkdir
mkdir со ссылкой
эхо-бла> источник / мой файл
cd withlink
коснуться бла
mklink mylink .. \ source \ myfile
@ ...
вопрос задан: 2 March 2012 20:45
0
ответов
Moose «строитель» против «по умолчанию»
Я понимаю, что использование Builder позволяет подклассам легко переопределять значения атрибутов по умолчанию, и они могут потребоваться для ролей. Это также можно сделать, используя значение по умолчанию, например: has 'foo' => is ...
вопрос задан: 2 March 2012 10:37
0
ответов
Что такое Python-эквивалент «perl -V»
Вывод, получаемый при запуске perl -V, содержит полезную информацию (см. Пример ниже). Есть ли что-нибудь подобное для Python? Пример вывода:% perl -V
Краткое описание моего perl5 (ревизия 5, версия ...
вопрос задан: 2 March 2012 00:32
0
ответов
Perl, чем отличается @INC?
У меня есть простой сценарий Perl, который выводит @INC в следующем виде: #! / Usr / bin / perl
напечатайте $ _, "\ n" для @INC; Я выполняю сценарий двумя разными способами с помощью ./test.pl и perl test.pl, вывод как ...
вопрос задан: 2 March 2012 00:30
0
ответов
is_deeply: тест игнорирует порядок в массиве?
Я ищу такую тестовую процедуру, как is_deeply, в Test :: More.
Есть cmp_bag от Test :: Deep, но он работает только с самим массивом, а не с ужасно большой структурой данных хеш-массивов-хешей ...
вопрос задан: 1 March 2012 21:37
0
ответов
относительные пути к файлам в perl
У меня есть сценарий perl, который использует относительные пути к файлам. Относительные пути кажутся относительными к месту, из которого выполняется сценарий, а не к местоположению сценария perl. Как мне ...
вопрос задан: 1 March 2012 12:41
0
ответов
Как прочитать значение параметра запроса из URL с помощью команды perl
В оболочке мне нужно извлечь определенный параметр запроса из URI. Я попытался поиграть с этим, чтобы получить значение "смещения" echo "/mypath/index.php?offset=20&query=uro" | perl -MURI -le 'chomp($url = &...
вопрос задан: 1 March 2012 09:17
0
ответов
Извлечение информации из $?
Не могли бы вы дать хорошее объяснение следующего фрагмента кода Perl. Я получил некоторую идею от Google, но по-прежнему существует большая путаница. отличная помощь, если вы можете сделать небольшие заметки об этом $ ...
вопрос задан: 1 March 2012 08:41
0
ответов
Может кто-нибудь объяснить мне это регулярное выражение
Я хотел бы понять значение этого выражения. $ req_msg = ~ s / \ $ {$ toReplace} / $ replacements -> {$ toReplace} / g;
вопрос задан: 29 February 2012 08:39
0
ответов
Use of uninitialized value in pattern match (m//)
Я получаю эту ошибку, хотя я объявил свою regex переменную. my $pattern = '(Cat\.\sNo\.\s\d+)'; Позже в моем коде я использую then $pattern. if ($page =~ /$pattern/)
{ push(@array, $element);
}...
вопрос задан: 29 February 2012 04:03
0
ответов
www::curl - как загружать (постить) большие файлы
Я использую WWW::Curl для загрузки файлов: use WWW::Curl::Easy 4.14;
use WWW::Curl::Form; my $url = 'http://example.com/backups/?sid=12313qwed323';
my $params = { name => 'upload', action => '...'.
вопрос задан: 28 February 2012 15:52
0
ответов
Можно ли в Perl запросить ввод пользователя после чтения данных, переданных по трубопроводу на STDIN?
Я пытаюсь написать сценарий perl, который читает данные, переданные по трубопроводу, а затем запрашивает ввод пользователя на основе этих данных. Следующий сценарий, prompt_for_action, - это то, что я пытаюсь сделать: #!/usr/bin/perl my @...
вопрос задан: 28 February 2012 15:09
0
ответов
Сколько регулярных выражений я могу связать вместе с помощью чередования?
У меня есть несколько больших файлов (сотни МБ), в которых мне нужно искать несколько тысяч ~ 20-символьных уникальных строк. Я обнаружил, что использование метасимвола чередования каналов для сопоставления обычных ...
вопрос задан: 27 February 2012 08:02
0
ответов
Как удалить элемент из Heap :: Simple в Perl
Есть ли способ удалить определенный элемент из кучи с помощью модуля Heap :: Simple? Есть только способ удалить верхний элемент .
вопрос задан: 25 February 2012 23:52
0
ответов
Как в Perl убедиться, что строка соответствует действительной дате?
Мне было интересно, есть ли в Perl простой способ гарантировать, что строка даты соответствует действительной дате. Например, 2012 02 30 неверно, потому что не существует.
вопрос задан: 25 February 2012 19:44
0
ответов
Как передать необязательные параметры функции Perl?
Я хочу передать функции несколько параметров, один из которых является необязательным. Единственный известный мне способ сделать это - использовать список (@) в качестве параметра. Таким образом, он ничего не содержит или 1 элемент (никогда не будет ...
вопрос задан: 25 February 2012 15:47