Perl - это процедурный, высокоуровневый, динамический язык программирования общего назначения, известный своей нативной поддержкой регулярных выражений и возможностями синтаксического анализа строк. Используйте этот тег для вопросов о Perl в целом. Для вещей, связанных с новым (но связанным) языком Raku (ранее "Perl 6"), используйте тег raku. Для регулярных выражений в стиле Perl на других языках используйте тег regex или, если они основаны на библиотеке PCRE, тег pcre.
2 ответа

Ошибка perl/dbi/sql в результате ошибки "операция должна использовать обновляемый запрос"

У меня есть Perl-скрипт, который создает sql cmd для установки определенных полей в NULL в определенной таблице в базе данных MS Access (извините). Вот упрощенный макет. my $nonKeyFields_hashref = { "country" => "ZZZ", "address3" => "FOO" }; m…
22 июл '13 в 07:43
1 ответ

Как смоделировать IO::Socket::INET с помощью Test::MockObject

Я пишу некоторые модульные тесты для модуля Perl, который использует IO::Socket::INET, поэтому я хотел бы смоделировать модуль IO::Socket::INET, используя Test::MockObject. Зр у меня что то типа $INC{'IO/Socket/INET.pm'} = 1; my $inet = Test::MockOb…
05 окт '11 в 14:21
2 ответа

XML title Шаблон регулярных выражений

Это мой ввод в статью, свойства изменят что угодно. Входные данные : <article xmlns:mml="http://www.w3.org/1998/Math/MathML" xmlns:oasis="http://www.niso.org/standards/z39-96/ns/oasis-exchange/table" xmlns:xlink="http://www.w3.org/1999/xlink" xml…
12 ноя '14 в 05:19
8 ответов

Должен ли я использовать \d или [0-9] для сопоставления цифр в регулярном выражении Perl?

Прочитав несколько вопросов / ответов за последние несколько недель, я увидел использование \d в perl регулярные выражения прокомментированы как некорректные. Как и в более поздних версиях Perl \d это не то же самое, что [0-9], как \d будет представ…
20 май '09 в 23:09
1 ответ

Пожалуйста, дождитесь кнопки на Perl? загрузка GIF и т. д. во время длинного запроса SQL

У меня есть веб-приложение, которое запускается через один файл perl, который работает с базой данных. В какой-то момент пользователь может выполнить действие, которое занимает много времени (оно добавляет несколько строк из одной таблицы в другую).…
13 ноя '14 в 01:51
5 ответов

Как я могу рекурсивно посещать ссылки без повторного просмотра ссылок?

Я хочу проверить сайт на наличие ссылок, а затем рекурсивно проверить эти сайты на наличие ссылок. Но я не хочу получать одну и ту же страницу дважды. У меня проблемы с логикой. Это код Perl: my %urls_to_check = (); my %checked_urls = (); &fetch…
22 май '09 в 19:04
1 ответ

Отправка сообщений системного журнала от Perl

Мы отправляем много сообщений системного журнала из нашего скрипта perls, используя код объекта local2. Это очень хорошо работает в Red Hat, но в SunOS сообщения не отправляются на local2. Например, вот минимальный скрипт #!/usr/bin/perl use strict;…
02 сен '13 в 02:10
2 ответа

Perl - Net::SFTP:: Зарубежные

Я пытаюсь написать скрипт загрузки в Perl, используя Net::SFTP::Foreign. У меня возникла проблема с проверкой, существует ли каталог, а если нет, создаю его. Net:: SFTP:: Foreign, кажется, просто выдает ошибку и закрывает соединение, если каталог не…
19 сен '18 в 08:25
1 ответ

Как получить среднее использование процессора / процессора компьютера?

Сейчас я работаю над программой на PHP и Perl для чтения системных данных компьютера, и мы используем SNMP для сбора данных (или, скорее, вынуждены). После извлечения данных мы должны были сохранить данные в базе данных, а затем использовать эти дан…
20 авг '10 в 04:10
1 ответ

Как цикл foreach в Perl работает с массивами в Perl

Эта программа должна выполняться три раза, но выполняется только дважды. Может кто-нибудь объяснить, как этот цикл foreach будет работать в Perl. #!/usr/bin/perl use strict; use warnings; my @arr=("sandeepr", "vijay","vikas"); for my $i( @arr) { pri…
18 мар '18 в 04:35
2 ответа

Истинная строка DateTime

В соответствии с: http://search.cpan.org/~drolsky/DateTime-1.43/lib/DateTime.pm#Formatters_And_Stringification будет работать следующее: use DateTime; $dt = DateTime->new( ... ); print $dt; # as string и это делает. Однако при использовании модул…
02 авг '17 в 19:48
1 ответ

Что-то не так с помощью Mojolicious::Plugin::Model

Я использую Mojolicious::Plugin::Model, но я не знаю, почему я не могу получить доступ к приложению. Ниже упрощенный код Приложение package App; use Mojo::Base 'Mojolicious'; sub startup { my $self = shift; $self->plugin('Model'); $r->get('/')…
14 ноя '16 в 16:31
4 ответа

Как извлечь полные домены из полей LDAP?

Что мне нужно сделать, это изменить строку, такую ​​как "CN=bobvilla, OU=People, DC=example, DC=com" (может иметь много DC = в строке) на "example.com" У меня есть этот метод, но он кажется мне небрежным, и я хотел посмотреть, есть ли у кого идея по…
17 июл '09 в 14:35
1 ответ

Выгрузка файла yaml с использованием perl

Я пытаюсь вывести файл yaml в определенном формате, как указано ниже; Как мне определить мой хэш (% базы данных), если мне нужно вывести что-то вроде ниже? -name:Fred Language:python -name:Barney Language:perl -name: Betty Language:java -name:Wilma …
25 апр '17 в 02:26
1 ответ

Не удается найти метод объекта "find_md5" через пакет "DBM::Deep::Engine::Sector::Scalar"

Кто-нибудь знает, почему я получаю эту ошибку? Can't locate object method "find_md5" via package "DBM::Deep::Engine::Sector::Scalar" at /u/xref/xref.10/bin/../lib/perl5/site_perl/5.8.8/DBM/Deep/Engine.pm line 1599 Пожалуйста, дайте мне знать, как из…
07 май '13 в 06:23
2 ответа

EWOULDBLOCK эквивалентно errno под Windows Perl

G'day Stackruers, Я являюсь автором прагмы Perl autodie, которая изменяет встроенные функции Perl для исключения при сбое. Это похоже на Fatal, но с лексической областью действия, расширяемой моделью исключений, более интеллектуальной проверкой возв…
25 сен '08 в 04:26
2 ответа

Сортировка числовых ключей хеша, разделенных дефисом

У меня есть такой хэш my %hash = ( '2011-49' => 'data1', '2011-100' => 'data2', '2009-22' => 'data3', '2011-11' => 'data4', '4323' => 'data5', '2354' => 'data6', '423532-2' => 'data7' ); Как отсортировать ключи хеша так, чтобы о…
19 фев '14 в 04:51
2 ответа

Удаление пары ключ / вал хэш оставляет ключ. Зачем?

Рассмотрим следующий код: $foo{'bar'}->{'lala'} = "lol"; delete($foo{'bar'}->{'lala'}); Когда я запускаю этот код, я ожидаю, что запись "lala" полностью исчезнет (ключ и значение). Однако, когда я использую Dumper для вывода этого хэша, это вы…
02 мар '12 в 19:45
2 ответа

Создание электронных таблиц Excel в Perl, которые ссылаются на сторонние надстройки

Я пытаюсь сгенерировать файл xls с помощью Spreadsheet::SimpleExcel, который вызывает функцию, определенную в надстройке третьей стороны (Bloomberg, если это имеет значение). Базовый пакет WriteExcel не позволяет мне записать это, потому что он не з…
26 окт '10 в 18:43
3 ответа

Получение уникальной случайной строки (при каждом запуске скрипта) из текстового файла с помощью perl

Текстовый файл, подобный следующему, называется "input.txt". some field1a | field1b | field1c ...another approx 1000 lines.... fielaNa | field Nb | field Nc Я могу выбрать любой разделитель полей. Нужен скрипт, который при каждом дискретном запуске …
23 июл '12 в 12:11