0
ответов
В чем разница между записью в STDOUT и дескриптором файла, открытым в «/ dev / tty»?
В чем разница между этими двумя Примеры? #! / usr / bin / perl
использовать предупреждения;
используйте 5.012;
мой $ str = "\ x {263a}"; откройте мой $ tty, '>: encoding (utf8)', '/ dev / tty' или die $ !;
скажем $ tty $ str;
close $ ...
вопрос задан: 23 December 2013 16:27
0
ответов
Как перенаправить STDOUT и STDERR в переменную
Я хочу перенаправить STDERR и STDOUT в переменную. Я сделал это. закрыть (STDOUT);
закрыть (STDERR); мой $ out;
open (STDOUT, ">>", \ $ out);
open (STDERR, ">>", \ $ out); для (1..10)
{print "...
вопрос задан: 20 December 2013 01:06
0
ответов
Копирование значений из одного хэша в другой в perl
У меня есть два хэша, один большой и один маленький. Все ключи меньшего хэша отображаются в большем хэше, но значения отличаются. Я хочу скопировать значения из большего хэша в меньший хэш. НАПРИМЕР.:...
вопрос задан: 18 December 2013 09:05
0
ответов
Составной HTTP-ответ с использованием Perl или PHP
Можно ли предоставить составной HTTP-ответ (с использованием Perl / PHP), как составной запрос? Сценарий такой: я хотел бы предоставить URL-адрес, который принимает параметр для EmployeeID, и в ...
вопрос задан: 11 December 2013 15:14
0
ответов
JavaScript VS Perl Script [закрыто]
В настоящее время я провожу исследование для отчета, в котором рассматриваются два языка сценариев. Мой на JavaScript и Perl Script, я хотел знать, есть ли какие-то "не очень известные" различия между ...
вопрос задан: 3 December 2013 22:20
0
ответов
Отправка почты через SMTP в Perl
Я пытаюсь отправить почта через SMTP в Perl. Я написал сценарий для этого. #!перл
использовать предупреждения;
использовать строгий;
использовать Net::SMTP; мой $smtpserver = 'сервер';
мой $smtpport = 25;
my $smtpuser = '...
вопрос задан: 21 November 2013 07:09
0
ответов
Объявление и заполнение хеш-таблицы за один шаг в Perl
В настоящее время, когда я хочу построить таблицу вида -, я использую :мое поле $has _= {}; map { $has _field ->{$ _} = 1 } @fields; Есть ли способ выполнить встроенную инициализацию за один шаг? (т.е. заполнить его...
вопрос задан: 20 November 2013 22:58
0
ответов
Создание веб-службы с помощью Perl
Мне нужно создать серверное приложение (крошечный веб-сервис) для тестирования предложений. Какие есть модули CPAN и библиотеки Perl для реализации такой задачи?
вопрос задан: 6 November 2013 08:39
0
ответов
Как я могу проверить, существует ли имя файла, соответствующее шаблону, в Perl?
Могу ли я сделать что-то подобное в Perl? Значение совпадения с образцом в имени файла и проверка его существования. if (-e "* .file") {# Сделать что-нибудь} Я знаю более длинное решение - спросить ...
вопрос задан: 5 November 2013 19:12
0
ответов
Регулярное выражение в нижнем регистре
Я использую это регулярное выражение для строчных предлогов, союзов и т. д. в текстовых файлах, и я хочу добавить 2 исключения: не вводите строчные буквы, если перед $ 1 стоит ":" или перед "-". Как правильно, ...
вопрос задан: 4 November 2013 20:14
0
ответов
Когда следует использовать «использовать», а когда «требовать» и когда «АВТОЗАГРУЗКА» в perl [хорошая практика программирования]?
Когда мы должны использовать «использовать», а когда «требовать» и когда «АВТОЗАГРУЗКА» в perl? Для этого мне нужно правило большого пальца.
вопрос задан: 23 October 2013 03:29
0
ответов
Как получить несколько аргументов в функциях Perl?
В своем коде я использую довольно примитивный метод извлечения параметров из вызова функции следующим образом: sub addSix ($$$$$$) { my ($a, $b, $c, $d, $e, $f) = (shift, shift, shift, shift, shift, ....
вопрос задан: 18 October 2013 18:51
0
ответов
как использовать «find» для поиска «_id => OBjectID (» id «)» в Perl API
Мне нужно найти что-то вроде «_id» в моем Mongo, я могу сделать это с помощью оболочки Mongo, а я не могу сделать это с помощью Perl API. Я пытаюсь это сделать (оболочка монго): ./mongo
использовать my_db
db.my_collection.find ({_ id: ...
вопрос задан: 18 October 2013 15:39
0
ответов
Поместите регулярное выражение только в массив, а не на всю строку
Я пытаюсь проверить каждую строку документа на соответствие регулярному выражению. Если в строке есть совпадение, я хочу вставить совпадение только в массив. В коде ниже, я думал, что с помощью оператора g в конце ...
вопрос задан: 14 October 2013 18:38
0
ответов
Все ли версии Perl будут поддерживать старые модули?
У меня установлен Perl 5.8 на всех наших серверах, и я хотел использовать модули DBI и DBD :: Oracle для доступа к нашим базам данных. Меня больше всего беспокоят новые версии Perl, модули DBI и DBD ...
вопрос задан: 2 October 2013 03:09
0
ответов
Как угадать минимальную версию perl, для которой написан конкретный скрипт?
У меня есть несколько скриптов, которые я писал временами, когда не понимал, как использовать v1.2.3 ; может быть полезно. Так что некоторые из них могут использовать функции из более поздних версий perl, некоторые из них могут быть в порядке, ...
вопрос задан: 2 October 2013 02:55
0
ответов
Соответствие сбалансированной круглой скобке в регулярном выражении Perl
У меня есть выражение, которое мне нужно разделить и сохранить в массиве: aaa = "bbb {ccc} ddd" {aa = "bb, cc" {a = "b" , c = "d"}}, aaa = "bbb {}" {aa = "b} b"}, aaa = "bbb, ccc" Это должно выглядеть так после разделения и ...
вопрос задан: 1 October 2013 17:22
0
ответов
Как лучше всего обрабатывать исключения в Perl?
Я заметил, что Exception.pm и Error.pm, похоже, не слишком широко используются в сообществе Perl. Это из-за большого объема eval для обработки исключений? Также программы Perl, похоже, ...
вопрос задан: 19 September 2013 19:13
0
ответов
Объединить ключи и значения в perl
У меня есть хэш со следующей парой ключ / значение 4 => модель1
2 => model2 Мне нужна следующая строка, созданная из приведенного выше хеша 4 X model1, 2 X model2 Я пробовал следующий мой% хеш,
...
вопрос задан: 19 September 2013 04:41
0
ответов
Как я могу сохранить результат системной команды в переменной Perl?
$ cat test.pl
мой $ pid = 5892;
мой $ not = system ("top -H -p $ pid -n 1 | grep myprocess | wc -l");
print "not = $ not \ n";
$ perl test.pl
11
not = 0
$ Я хочу записать результат, т.е. 11, в переменную. ...
вопрос задан: 18 September 2013 05:49
0
ответов
Как я могу представить наборы в Perl?
Я хотел бы представить набор в Perl. Обычно я использую хэш с некоторым фиктивным значением, например: my% hash = (); $ Хэш { "element1"} = 1; $ Хэш { "element5"} = 1; Тогда используйте if (определенный $ hash {$ ...
вопрос задан: 13 September 2013 21:20
0
ответов
Есть ли условный способ условно «последнего» из этого Perl Loop?
Не совсем знал Perl, я усилил сценарий Perl с помощью с помощью дружеской поисковой системы. Я нахожу, что мне нужно вырваться из цикла, установив флаг, если условие сбьется: ...
вопрос задан: 5 September 2013 13:56
0
ответов
How to remove last n number of numeric characters from a string in perl
I have a situation where I need to remove the last n numeric characters after a / character. For eg: /iwmout/sourcelayer/iwm_service/iwm_ear_layer/pomoeron.xml @@/main/lsr_int_vnl46a/61 After the ...
вопрос задан: 5 September 2013 13:04
0
ответов
Как в Perl отделить внешний цикл от внутреннего?
Предположим, у меня есть фрагмент кода Perl например: foreach my $ x (@x) {foreach my $ y (@z) {foreach my $ z (@z) {if (something ()) {# Я хочу вырваться на свободу! } # делать что-нибудь} # делать что-нибудь} # ...
вопрос задан: 5 September 2013 13:02
0
ответов
Консолидация данных с использованием Perl [закрыто]
У меня есть следующие данные в большом файле 8915, fun1, 10 8915, fun1, 8 8915, fun1, 12 8915, fun2, 5 8915, fun2, 6 8915, fun2, 4 8916, fun1, 12 8916, fun1, 13 8916, fun2, 4 8916, fun2, 5 Хочу найти ...
вопрос задан: 16 August 2013 21:28
0
ответов
Есть ли способ выполнить «Заменить или вставить» с помощью преобразования web.config?
Я использую преобразование web.config, как описано в сообщении ниже, для создания конфигураций для различных сред. http://vishaljoshi.blogspot.com/2009/03/web-deployment-webconfig-………………………………………………………………………………………… Я использую преобразование web.config,
вопрос задан: 15 August 2013 11:46
0
ответов
Почему Perl говорит, что глобальный символ «SYMBOL» требует явного имени пакета в строке X PROGRAM.pl?
Я пишу свои первые программы на Perl, и написал следующее: use strict;
использовать предупреждения;
$ animal = "верблюд";
печать ($ животное); Когда я запускаю его, я получаю следующие сообщения из командной строки Windows: Глобальный символ "...
вопрос задан: 14 August 2013 04:16
0
ответов
определение отступа perl для emacs в файле исходного кода?
Можно ли поместить комментарий вверху исходного Perl-файла, чтобы Emacs соблюдал правило отступа в 4 пробела в том же файле, независимо от правила отступа по умолчанию, определенного в .emacs? Я ...
вопрос задан: 12 August 2013 12:13
0
ответов
Как лучше всего очистить переменные, соответствующие регулярному выражению?
Как лучше всего очистить/сбросить все переменные, соответствующие регулярному выражению? Пример того, как $1 не сбрасывается между операциями с регулярными выражениями и использует самое последнее совпадение: $_="это человек, который сделал новогодний гро
вопрос задан: 8 August 2013 18:14
0
ответов
Как преобразовать массив в хеш в Perl?
У меня есть массив, и я попытался преобразовать содержимое массива в хеш с ключами и значениями. Индекс 0 является ключом, индекс 1 является значением, индекс 2 является ключом, индекс 3 является значением и т. Д. Но он не производит ...
вопрос задан: 6 August 2013 00:57