0
ответов

Соответствует ли \ w всем буквенно-цифровым символам, определенным в стандарту Unicode?

Соответствует ли \ w в Perl всем буквенно-цифровым символам, определенным в стандарте Unicode? Например, будет ли \ w соответствовать всем (скажем) китайским и русским буквенно-цифровым символам? Я написал простой тестовый сценарий (см. ...
вопрос задан: 29 March 2012 18:20
0
ответов

Is There a Way to Match Any Unicode non-Alphabetic Character?

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...)....
вопрос задан: 29 March 2012 18:02
0
ответов

Perl:Перебор INI-файлов

Я создаю Perl-скрипт, который должен читать и получать значения из INI-файла. Формат файла INI:[имя] Свойство=значение Пример:[переключатель_6500] процессор = 1.5.1.12.4 free_memory=1.45.32.16 [...
вопрос задан: 29 March 2012 14:22
0
ответов

Прочитать последнюю строку файла с данными на Perl

У меня есть текстовый файл для разбора на Perl, я разбираю его с начала файла и получаю нужные данные. После всего, что сделано, я хочу прочитать последнюю строку в файле с данными. Проблема в том, что...
вопрос задан: 29 March 2012 08:57
0
ответов

Какой самый быстрый способ удалить строки в файле, которые не совпадают во втором файле?

У меня есть два файла, wordlist.txt и text.txt. Первый файл, wordlist.txt, содержит огромный список слов на китайском, японском и корейском языках, например: 你 你们 我 Второй файл, text.txt, содержит длинные ...
вопрос задан: 28 March 2012 13:57
0
ответов

Perl hash Data::Dumper

В Perl мне нужно проанализировать огромный хэш, поэтому я печатаю его в файл с помощью модуля Data::Dumper. Поскольку это огромный файл, его очень трудно читать. Можно ли как-то красиво распечатать вывод Dumper, так что...
вопрос задан: 27 March 2012 12:21
0
ответов

Perl: Неожиданное поведение $_

используйте Modern: : Перл; использовать дату и время; использовать автодиапазон; мой $dt; откройте мой $fh, '<', 'data.txt'; # получить первую дату из файла while (<$fh> && !$dt) { if ( /^(\d+:\d+:\d+)/ ) { $dt ...
вопрос задан: 27 March 2012 12:06
0
ответов

Как предотвратить печать имени переменной с помощью `Data::Dumper`

Я использую Data::Dumper для вывода хэша perl с конфигурацией, который будет оцениваться другим скриптом. Проблема в том, что он всегда печатает $VAR = в начале вывода. Я попробовал установить настройки ...
вопрос задан: 27 March 2012 08:23
0
ответов

Разница между uri_for и uri_for_action

В чем разница между методами $c->uri_for и $c->uri_for_action в Catalyst. Какой использовать? И почему?
вопрос задан: 27 March 2012 07:05
0
ответов

Шестнадцатеричная строка Perl в двоичную строку

Я пытаюсь преобразовать строку шестнадцатеричных цифр в двоичную строку. Если моя входная строка равна 41424344, я бы хотел, чтобы строка хранила «ABCD». Как это может быть сделано?
вопрос задан: 26 March 2012 16:03
0
ответов

Perl CGI hacked? But I'm doing everything right

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-...
вопрос задан: 26 March 2012 00:19
0
ответов

Как подсчитать количество уникальных символов в файле?

Имея файл в UTF-8, содержащий символы на разных языках, как я могу получить количество уникальных символов, которые он содержит, исключая выбранное количество символов (например: "!", "@", "...
вопрос задан: 24 March 2012 01:59
0
ответов

Всегда ли статус кода выхода с нулевым значением означает успешное выполнение в Perl?

У меня есть Perl-скрипт, который будет выполнять три приложения. Все они имеют разный статус кода выхода. Статус кода выхода первого приложения — 1. Приложение завершилось нормально без каких-либо проблем. (...
вопрос задан: 23 March 2012 06:48
0
ответов

Советы по снижению использования памяти Perl

Какие есть хорошие советы по снижению использования памяти в Perl-скрипте? Я заинтересован в том, чтобы узнать, как сохранить как можно меньше памяти для систем, зависящих от программ Perl. Я знаю ...
вопрос задан: 22 March 2012 23:13
0
ответов

Print:ничего не выводит

Я немного запутался. Я только что получил новую машину для разработки, и Perl, похоже, ничего не выводит для команд печати. #!/usr/бен/перл использовать предупреждения; использовать строгий; напечатать «А»; напечатать STDOUT "B"; print...
вопрос задан: 22 March 2012 21:41
0
ответов

Странное округление «от половины до четности» в разных языках [закрыто]

GNU bash, версия 4.2.24: $> printf "%.0f, %.0f\n" 48,5 49,5 48, 50 Ruby 1.8.7 > printf( "%.0f, %.0f\n", 48.5, 49.5 ) 48, 50 Perl 5.12.4 $> perl -e 'printf( "%.0f, %.0f\n", 48.5, 49.5 )' ...
вопрос задан: 22 March 2012 20:28
0
ответов

Доступ к объекту журнала танцора?

Обычно при использовании dancer вы вызываете, например, debug 'foo'; и он будет регистрировать текст. Но я хочу иметь возможность регистрировать вещи в объекте, который не импортирует синтаксис танцора. Мне интересно, есть ли'...
вопрос задан: 22 March 2012 20:13
0
ответов

Как реализовать историю команд на клиенте telnet? (стрелки вверх/вниз)

У меня есть сервер, который принимает telnet-соединения для управления. Мне не хватает истории команд, поэтому я хочу, чтобы мой сеанс telnet поддерживал ее. Мои вопросы: 1) Должен ли я реализовать это на сервере...
вопрос задан: 21 March 2012 17:13
0
ответов

Может ли BerkeleyDB в perl обрабатывать хеш хэшей хэшей (до n)?

У меня есть скрипт, использующий хэш, который содержит четыре строки в качестве ключей, значениями которых являются хэши. Эти хэши также содержат четыре строки в качестве ключей, значениями которых также являются хэши. Этот шаблон...
вопрос задан: 21 March 2012 16:34
0
ответов

Есть ли способ проверить, был ли скаляр преобразован в строку или нет?

Я пишу вещь для вывода чего-то похожего на JSON из структуры Perl. Я хочу, чтобы цитирование вело себя так: «строка» выводит «строка» "05" выводит "05" "5" выводит "5" 5 выходов 5 05 ...
вопрос задан: 20 March 2012 23:12
0
ответов

Perl: Почему нельзя использовать last для выхода из grep или map?

Perldocs говорит следующее о last: last нельзя использовать для выхода из блока, который возвращает значение, такое как eval {}, sub {} или do {}, и не следует использовать для выхода из grep() или операция карты(). ...
вопрос задан: 20 March 2012 23:01
0
ответов

Функция Perl Pack ('V') в Python?

Недавно я работал над разработкой некоторых эксплойтов, чтобы подготовиться к учебному курсу, и у меня возникла проблема с учебником. Я слежу за всеми учебными пособиями, которые могу найти, ...
вопрос задан: 20 March 2012 19:38
0
ответов

Как бы вы создали и прошли хэш хэшей (глубины n), при этом значения на глубине n были бы целыми числами?

Я хочу хранить последовательности ДНК размера n в описанной структуре данных. Каждый хэш может содержать ключи C, G, A, T, которые будут иметь хеш-значения. Эти хеш-значения будут точно такими же хэшами — ...
вопрос задан: 20 March 2012 16:30
0
ответов

Проверка существования хеш-ключа создает ключ

Учитывая следующий код #!/usr/bin/perl use Data::Dumper; мой %хеш; мой @colos = qw(ac4 ch1 ir2 ird kr3); foreach my $colo (@colos) { if(exists $hash{output}{$colo}) { print "$colo is ...
вопрос задан: 20 March 2012 15:04
0
ответов

Какой модуль Perl мне следует использовать для создания проверяющей веб-формы CRUD?

Кто-нибудь успешно использовал что-то вроде DBIx :: Class :: WebForm или CatalystX-CRUD для автоматического создания самопроверяющейся веб-формы из таблицы базы данных? Я представляю модуль, который читает базу данных ...
вопрос задан: 20 March 2012 11:04
0
ответов

Обрезать (не округлять) десятичные разряды в sprintf?

Я хочу отображать стоимость в долларах с двумя цифрами после запятой для обозначения центов. В приведенной ниже программе вывод равен 23,24. Perl округляет десятичные разряды. Как этого избежать. Я хочу...
вопрос задан: 20 March 2012 05:58
0
ответов

Есть ли в python аналог perl-модуля-стартера?

Есть ли в python аналог perl-модуля-стартера?
вопрос задан: 20 March 2012 03:16
0
ответов

Слишком поздно для -CSD

Попытка запустить эту маленькую Perl-программу из parsCit: parsCit-client.pl e1.txt Слишком поздно для -CSD в строке [имя файла] 1 e1.txt находится здесь: http://dl.dropbox.com/u/10557283/parserProj/e1.txt I'...
вопрос задан: 20 March 2012 02:25
0
ответов

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

Я хотел бы удалить все файлы . из строки, кроме последней. Это можно сделать в JavaScript следующим образом: var s='1.2.3.4'; s=s.split('.'); s.splice(s.length-1,0,'.'); с.присоединиться(''); а когда попробуй то же...
вопрос задан: 19 March 2012 13:54
0
ответов

Запретить Perl печатать одинаковые предупреждающие сообщения

В качестве примера рассмотрим следующий бессмысленный скрипт: use strict; использовать предупреждения; мое $uninitializedValue; while(<>){ print ${$uninitializedValue}{$_},"\n"; } Который запускается из команды ...
вопрос задан: 19 March 2012 12:27