0
ответов

perl s/this/that/r ==> "Bareword found where operator expected"

Perl docs рекомендует следующее: $foo = $bar =~ s/this/that/r; Однако, я получаю эту ошибку: Bareword found where operator expected near "s/this/that/r" (#1) This is specific to the r modifier, without ...
вопрос задан: 20 February 2018 14:07
0
ответов

Отправлять ввод с клавиатуры в запущенный процесс linux

Я разрабатываю веб-интерфейс для mp3-плеера (mpg123 linux). Mpg123 - это mp3-плеер командной строки, которым можно управлять с клавиатуры. Например: $ mpg123 -C filename.mp3 это будет ...
вопрос задан: 13 February 2018 11:22
0
ответов

Печать всего, кроме первого поля, с помощью awk

У меня есть файл, который выглядит так: AE United Arab Emirates AG Antigua & Barbuda Нидерландские Антильские острова Американское Самоа BA Босния и Герцеговина BF Буркина-Фасо Б.Н. Бруней-Даруссалам ...
вопрос задан: 20 January 2018 05:04
0
ответов

Что означает назначение 'shift 'к значению переменной?

Пример: use strict; мой $ файл = сдвиг; open (IN, $ file) || die "Невозможно открыть $ file \ n"; открыть (OUT, "> $ file. $$") или умереть $ !; Что происходит с my $ file = shift?
вопрос задан: 12 January 2018 15:58
0
ответов

Perl DBI - Сбор ошибок

Какой лучший способ фиксировать любые ошибки DBI в Perl? Например, если вставка не удалась из-за того, что во вставляемых значениях были недопустимые символы, как я могу не допустить сбоя сценария, но ...
вопрос задан: 9 January 2018 11:01
0
ответов

Как перенаправить вывод команды Bash Shell построчно в Perl для обработки Regex?

У меня есть выходные данные некоторых команд Bash Shell. Вывод разделяется построчно с помощью символов «\ n» или «\ 0». Я хотел бы знать, есть ли способ передать вывод в Perl и обработать ...
вопрос задан: 13 December 2017 05:03
0
ответов

Регулярное выражение для сопоставления сбалансированных скобок в python или perl [закрыто]

Проверить определенный шаблон. Допустимые шаблоны: () [] {() []} [{} () {()}] Недопустимые шаблоны: [{]} ({} [)] Я пытаюсь сделать регулярное выражение для этого, Любой может помочь мне за ...
вопрос задан: 10 December 2017 13:51
0
ответов

Процесс Perl застревает с «*** обнаружена glibc *** perl: поврежденный двусвязный список: 0x0000000001474b40 ***» - как я могу его завершить?

Я пытался отладить проблему повреждения памяти с помощью Perl 5 и XML :: LibXML (которые я сейчас поддерживаю). Вот что я получаю: (скрыто)
вопрос задан: 29 November 2017 17:36
0
ответов

perl: как посчитать несколько значений в хэше в новый хэш?

Мой текущий хэш:% hash = ("foo", ["apple", "orange", "apple", "apple"], "bob", ["apple", "orange",],); Как мне получить этот вывод? % hash2 = (яблоко ...
вопрос задан: 5 November 2017 17:59
0
ответов

Использование модуля Perl

Я пытаюсь создать свой собственный модуль Perl в / usr / local / lib / perl. У меня установлена ​​переменная окружения PERL5LIB: $ env | grep PERL PERL5LIB = / usr / local / lib / perl Если я создам модуль: $ PERL5LIB / My / ...
вопрос задан: 24 October 2017 04:28
0
ответов

Как основные типы данных (строки и целые числа) реализованы в Python и Perl

В последнее время я задавался вопросом, как различные операции, которые я выполняю с базовыми типами, такими как строки и целые числа, работают с точки зрения производительность, и я полагаю, что мог бы получить гораздо лучшее представление об этом, есл
вопрос задан: 21 October 2017 21:58
0
ответов

Лучший IDE для Perl 5 [закрыто]

У меня есть хороший опыт написания сценариев оболочки Bash, и теперь я перехожу на Perl. Какой самый лучший IDE для Perl 5? Будет ли Perl 6 убивать Perl 5? Или Perl 5 всегда будет жив?
вопрос задан: 18 October 2017 22:19
0
ответов

Как лучше всего найти все суперклассы класса Perl?

Существует ли стандартный способ CPAN для определения всех суперклассов класса Perl (или, что еще лучше, всего дерева суперклассов, вплоть до UNIVERSAL)? Или лучше всего просто изучить @{"${$class}::ISA"} ...
вопрос задан: 15 October 2017 16:40
0
ответов

В чем разница между вызовом метода через «->» и передачей класса/объекта в качестве первого параметра?

Из perldoc perlobj (цитируется в этом превосходном ответе): my $fred = Critter->find("Fred"); $fred->display("Рост", "Вес"); ... приведенный выше код в основном эквивалентен: my $fred = ...
вопрос задан: 15 October 2017 16:40
0
ответов

Доступ к переменным класса с помощью переменной с именем класса в perl

Мне интересно, как бы я это сделал: package Something; наш секрет $ = "бла"; sub get_secret {мой ($ class) = @_; возвращение; # Я хочу вернуть сюда секретную переменную } Now when I ...
вопрос задан: 15 October 2017 16:37
0
ответов

Каковы преимущества и недостатки Perl для ООП?

Мне было интересно, насколько хорошо Perl будет работать для программирования на основе ООП. Каковы преимущества и недостатки использования Perl для ООП, и если есть недостатки, существуют ли обратные пути ...
вопрос задан: 13 October 2017 17:36
0
ответов

Вызов подпрограммы в ООП Perl

При просмотре кода, который я взял на себя, я наткнулся на эту строку: my @files = My :: Module :: DB :: raw_info-> search_like (customer_handle => $ config -> {client}, feed => $ config- > {site}, ...
вопрос задан: 13 October 2017 12:19
0
ответов

Есть ли проблема в perl 5.12.2 при использовании splice на @ISA?

Ниже приведен сеанс отладки на Perl 5.12. Есть ли в этом смысл? Кэширует ли UNIVERSAL версию переменной @ISA, которая, если навсегда, будет использовать ее в дальнейшем. Еще до того, как Class :: ISA был объявлен устаревшим, я ...
вопрос задан: 13 October 2017 12:16
0
ответов

Grep, чтобы найти элемент в массиве Perl

Каждый раз, когда я что-то ввожу, код всегда говорит мне, что он существует. Но я знаю, что некоторых входов не существует. Что случилось? #! / usr / bin / perl @array = <>; print "Введите слово, которое вам нужно ...
вопрос задан: 12 October 2017 19:30
0
ответов

Как печатать переменные в Perl

У меня есть код, похожий на мой ($ ids, $ nIds); в то время как () {чавкать; $ ids. = $ _. ""; $ nIds ++; } Это должно объединить каждую строку в моем myFile, а nIds должен быть моим номером ...
вопрос задан: 12 October 2017 18:39
0
ответов

Флаги Perl -pe, -pi, -p, -w, -d, -i, -t?

Я видел много способов запуска кода или сценариев Perl с разные флаги. Однако, когда я пытаюсь найти в Google значение каждого флага, я в основном получаю результаты на общих сайтах Perl, а не на конкретных ...
вопрос задан: 12 October 2017 18:12
0
ответов

Как использовать переменные оболочки в вызове команды perl в скрипте оболочки bash?

Как использовать переменные оболочки в вызове команды perl в скрипте оболочки bash? У меня есть команда perl в моем сценарии оболочки для оценки даты -1. Как я могу использовать $ myDate в вызове команды perl? Это раздел ...
вопрос задан: 18 September 2017 02:56
0
ответов

Как я могу скрыть/защитить пароль от Perl-скрипта

Я пишу Perl-скрипт, который должен подключаться к SMTP-серверу для отправки почты, но мне очень не нравятся такие вещи :my $pass = '123456'; И я нашел Данные ::Зашифрованные, что следует...
вопрос задан: 13 September 2017 13:23
0
ответов

Как создать 2D-массив в Perl?

Я пытаюсь создать двумерный массив на Perl, мой код: my @ wordsList = (); мои @ слова = (); для ($ id = 0; $ id <= @language.length ; $ id ++) {my $ eng = $ db-> selectall_arrayref ("выберите слово из ...
вопрос задан: 21 August 2017 18:58
0
ответов

Отрицательное регулярное выражение для соответствия шаблону строки Perl

У меня есть это регулярное выражение: if ($ string = ~ m / ^ (Clinton | [^ Bush] | Reagan) / i) {print " $ строка \ n "}; Я хочу соответствовать Клинтону и Рейгану, но не Бушу. Это не работает.
вопрос задан: 12 August 2017 14:09
0
ответов

Как проверить соответствие множественных шаблонов в Perl

Есть ли способ избежать использования этого для множественных проверок шаблонов? Могу ли я разорвать все шаблоны в массиве и проверить, соответствует ли он какому-либо шаблону в массиве шаблонов? Пожалуйста, рассмотрите случай, когда я ...
вопрос задан: 12 August 2017 13:42
0
ответов

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

В скрипте Perl: $ а = яблоко $ b = orange if ($? == 0) {# сделать что-нибудь } Что означает $? означает здесь?
вопрос задан: 10 August 2017 19:00
0
ответов

Как выполнить функцию Perl qx с переменной

Как мне получить функцию qx Perl для выполнения с моей переменной $ opt? До (работает): мой @df_output = qx (df -k / tmp); Я хочу использовать либо -k, -g, или -H: my @df_output = qx (df - $ opt / tmp);
вопрос задан: 10 August 2017 14:15
0
ответов

Как я могу вызвать программу Java из Perl?

Я новичок в Perl, пытаюсь что-то сделать и не могу найти ответ. Я создал проект Java, содержащий основной класс, который получает несколько входных параметров. Я хочу обернуть свою Java в Perl: ...
вопрос задан: 9 August 2017 17:56
0
ответов

Плюсы и минусы реализаций Perl DBM? (GDBM, Berkeley DB и т. Д.) [Закрыто]

Я использовал GDBM и Berkeley DB / DB_File для более ранних проектов Perl, но следует ли мне их использовать для новых? Каковы плюсы и минусы различных реализаций Perl DBM? (По теме: такие инструменты, как ...
вопрос задан: 4 August 2017 09:53