Соответствует ли \ w в Perl всем буквенно-цифровым символам, определенным в стандарте Unicode? Например, будет ли \ w соответствовать всем (скажем) китайским и русским буквенно-цифровым символам? Я написал простой тестовый сценарий (см. ...
I have some documents that went through OCR conversion from PDF into HTML. Because of that, they wound up having lots of random unicode punctuation where the converter messed up (i.e. elipses, etc...)....
Я создаю Perl-скрипт, который должен читать и получать значения из INI-файла. Формат файла INI:[имя] Свойство=значение Пример:[переключатель_6500] процессор = 1.5.1.12.4 free_memory=1.45.32.16 [...
У меня есть текстовый файл для разбора на Perl, я разбираю его с начала файла и получаю нужные данные. После всего, что сделано, я хочу прочитать последнюю строку в файле с данными. Проблема в том, что...
У меня есть два файла, wordlist.txt и text.txt. Первый файл, wordlist.txt, содержит огромный список слов на китайском, японском и корейском языках, например: 你
你们
我 Второй файл, text.txt, содержит длинные ...
В Perl мне нужно проанализировать огромный хэш, поэтому я печатаю его в файл с помощью модуля Data::Dumper. Поскольку это огромный файл, его очень трудно читать. Можно ли как-то красиво распечатать вывод Dumper, так что...
используйте Modern: : Перл;
использовать дату и время;
использовать автодиапазон; мой $dt; откройте мой $fh, '<', 'data.txt'; # получить первую дату из файла
while (<$fh> && !$dt) { if ( /^(\d+:\d+:\d+)/ ) { $dt ...
Я использую Data::Dumper для вывода хэша perl с конфигурацией, который будет оцениваться другим скриптом. Проблема в том, что он всегда печатает $VAR = в начале вывода. Я попробовал установить настройки ...
Я пытаюсь преобразовать строку шестнадцатеричных цифр в двоичную строку. Если моя входная строка равна 41424344, я бы хотел, чтобы строка хранила «ABCD». Как это может быть сделано?
I just noticed some strange PHP files in one of my web directories. They turned out to be spammer-placed exploit files. They've been there since 2006, around the time that I was running a high-...
Имея файл в UTF-8, содержащий символы на разных языках, как я могу получить количество уникальных символов, которые он содержит, исключая выбранное количество символов (например: "!", "@", "...
У меня есть Perl-скрипт, который будет выполнять три приложения. Все они имеют разный статус кода выхода. Статус кода выхода первого приложения — 1. Приложение завершилось нормально без каких-либо проблем. (...
Какие есть хорошие советы по снижению использования памяти в Perl-скрипте? Я заинтересован в том, чтобы узнать, как сохранить как можно меньше памяти для систем, зависящих от программ Perl. Я знаю ...
Я немного запутался. Я только что получил новую машину для разработки, и Perl, похоже, ничего не выводит для команд печати. #!/usr/бен/перл использовать предупреждения; использовать строгий; напечатать «А»; напечатать STDOUT "B"; print...
Обычно при использовании dancer вы вызываете, например, debug 'foo'; и он будет регистрировать текст. Но я хочу иметь возможность регистрировать вещи в объекте, который не импортирует синтаксис танцора. Мне интересно, есть ли'...
У меня есть сервер, который принимает telnet-соединения для управления. Мне не хватает истории команд, поэтому я хочу, чтобы мой сеанс telnet поддерживал ее. Мои вопросы: 1) Должен ли я реализовать это на сервере...
У меня есть скрипт, использующий хэш, который содержит четыре строки в качестве ключей, значениями которых являются хэши. Эти хэши также содержат четыре строки в качестве ключей, значениями которых также являются хэши. Этот шаблон...
Я пишу вещь для вывода чего-то похожего на JSON из структуры Perl. Я хочу, чтобы цитирование вело себя так: «строка» выводит «строка»
"05" выводит "05"
"5" выводит "5"
5 выходов 5
05 ...
Perldocs говорит следующее о last: last нельзя использовать для выхода из блока, который возвращает значение, такое как eval {}, sub {} или do {}, и не следует использовать для выхода из grep() или операция карты(). ...
Недавно я работал над разработкой некоторых эксплойтов, чтобы подготовиться к учебному курсу, и у меня возникла проблема с учебником. Я слежу за всеми учебными пособиями, которые могу найти, ...
Я хочу хранить последовательности ДНК размера n в описанной структуре данных. Каждый хэш может содержать ключи C, G, A, T, которые будут иметь хеш-значения. Эти хеш-значения будут точно такими же хэшами — ...
Кто-нибудь успешно использовал что-то вроде DBIx :: Class :: WebForm или CatalystX-CRUD для автоматического создания самопроверяющейся веб-формы из таблицы базы данных? Я представляю модуль, который читает базу данных ...
Я хочу отображать стоимость в долларах с двумя цифрами после запятой для обозначения центов. В приведенной ниже программе вывод равен 23,24. Perl округляет десятичные разряды. Как этого избежать. Я хочу...
Попытка запустить эту маленькую Perl-программу из parsCit: parsCit-client.pl e1.txt Слишком поздно для -CSD в строке [имя файла] 1 e1.txt находится здесь: http://dl.dropbox.com/u/10557283/parserProj/e1.txt I'...
Я хотел бы удалить все файлы . из строки, кроме последней. Это можно сделать в JavaScript следующим образом: var s='1.2.3.4';
s=s.split('.');
s.splice(s.length-1,0,'.');
с.присоединиться(''); а когда попробуй то же...
В качестве примера рассмотрим следующий бессмысленный скрипт: use strict;
использовать предупреждения; мое $uninitializedValue; while(<>){ print ${$uninitializedValue}{$_},"\n";
} Который запускается из команды ...