0
ответов

@ARGV пуст при использовании ActivePerl в Windows 7

У меня есть следующий сценарий Perl. Я пытаюсь запустить его в Windows 7 с помощью ActivePerl: #! C: \ Perl64 \ bin \ perl.exe -w use strict; мой $ mp3splt_exe = 'c: \ Program Files (x86) \ mp3splt \ mp3splt.exe'; my $ ...
вопрос задан: 20 November 2010 19:36
0
ответов

Как я могу собрать все ленивые функции Moose?

У меня есть куча ленивых функций в объекте Moose. Некоторым строителям требуется время для завершения. Хочу отозвать всех строителей (дамп "бомбовый" объект). Могу я сделать всех ленивыми ...
вопрос задан: 19 November 2010 14:00
0
ответов

Какую оболочку использует вызов system() в Perl?

Я использую системный вызов для выполнения некоторых задач system('myframework mycode'); но он жалуется на отсутствие переменных окружения. Эти переменные окружения установлены в моей оболочке bash (откуда я запускаю ...
вопрос задан: 19 November 2010 12:45
0
ответов

Как использовать именованные группы регулярных выражений в выводе подтверждения?

Предположим, у меня есть файл foo.txt со следующим содержанием: [2010-11-13 12: 00: 02,656] [2010-11-13 12: 00: 02,701] [2010-11-13 12: 00: 02,902] Когда я подтверждаю часть даты следующим образом, это работает: ...
вопрос задан: 19 November 2010 06:43
0
ответов

How to read in ISO 8859-1 (Latin-1) encoded text in Perl

So I'm trying to write a perl script to read in a file encoded in Latin-1. For some reason, this just isn't working out. When I try to do a simple search for a character that I know is in the file (...
вопрос задан: 19 November 2010 01:19
0
ответов

Объединение строк в Perl с помощью «join»

См. Обновление ниже Я просматриваю целую кучу сценариев Perl, написанных кем-то в моей компании. Он использовал соединение для объединения строк. Например, он это делает (взято из настоящего Perl-скрипта) ...
вопрос задан: 18 November 2010 18:39
0
ответов

как найти последний индекс строки в perl

Я новичок в написании сценариев на Perl. Может ли кто-нибудь сказать мне, как найти последний индекс подстроки в строке, которая повторяется несколько раз в строке. На самом деле я хочу извлечь имя файла из файла ...
вопрос задан: 18 November 2010 15:13
0
ответов

Как я могу применить функцию к списку с помощью карты?

​​Я хочу применить функцию к каждому элементу списка и сохранить результаты, аналогичные map (function, list) в python. Пытался передать функцию на карту, но возникла эта ошибка: perl -le 'my $ s = sub {}; @r = карта ...
вопрос задан: 18 November 2010 13:53
0
ответов

Скрипт умирает, если модуль то, что не существует, используется во время sort () - DateTime :: TimeZone :: Local пример

use DateTime :: TimeZone :: Local; используйте Test :: More tests => 1; мой @input = (1 .. 10); мой (@output) = sort {DateTime :: TimeZone :: Local-> TimeZone (); $ a cmp $ b } @input; is_deeply (\ @ output, \ @ ...
вопрос задан: 17 November 2010 17:34
0
ответов

Последовательные шаги для установки Perl Strawberry, MySQL и DBD :: mysql в Windows XP

Я ищу хорошее руководство с последовательными и подробными шагами по установке Perl Strawberry, MySQL и DBD :: mysql в Windows XP. Основная цель, которую я хочу здесь достичь, - иметь возможность ...
вопрос задан: 17 November 2010 16:08
0
ответов

Perl или анализ настроений в Java

Мне было интересно, знает ли кто-нибудь о хороших модулях Perl и / или классах Java для анализа настроений. Я читал о LingPipe, но в конечном итоге программу нужно будет использовать для коммерческого использования, поэтому ...
вопрос задан: 17 November 2010 11:36
0
ответов

Каков наилучший способ для сравнения дат в Perl?

Мне нужно прочитать 2 даты и сравнить их. Одна дата - это current_date (год, месяц, число) другой определяется бизнес-логикой. Затем мне нужно сравнить 2 даты и посмотреть, не предшествует ли одна ...
вопрос задан: 16 November 2010 22:10
0
ответов

How can I make a JSON POST request with LWP?

If you try to login at https://orbit.theplanet.com/Login.aspx?url=/Default.aspx (use any username/password combination), you can see that the login credentials are sent as a non-traditional set of ...
вопрос задан: 16 November 2010 21:40
0
ответов

Самый быстрый способ (время выполнения) найти самый длинный элемент в списке

Это самый быстрый (время выполнения) способ найти самый длинный элемент в списке? #! / usr / bin / env perl use warnings; используйте 5.012; использовать List :: Util qw (уменьшить); используйте List :: Util :: XS; мой @array = qw (один два ...
вопрос задан: 16 November 2010 01:17
0
ответов

Почему моментальные снимки Windows занимают много времени?

Я запускаю обычную установку Windows на том Amazon EBS. Компьютеру требуется 10 минут для загрузки, что можно понять, поскольку требуется 2 перезагрузки. Однако создание снимка - это тоже 10-15 ...
вопрос задан: 15 November 2010 18:12
0
ответов

Уместно ли в Perl использовать map в контексте void вместо цикла foreach?

В Perl, если у вас есть такой цикл: foreach (@items) {perform_action ( $ _); } вы можете заменить его вызовом map в пустом контексте: map {perform_action ($ _) } @Предметы; Есть ли какие-нибудь ...
вопрос задан: 13 November 2010 20:20
0
ответов

Perl: что делает checkstack.pl в исходном коде linux?

Я работаю над проектом в ядре Linux, и я хотел знать, что делает этот checkstack.pl? Я никогда не изучал Perl, поэтому не могу понять программу. Было бы здорово, если бы я смог разобраться в программе ...
вопрос задан: 13 November 2010 16:38
0
ответов

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

Коллега сказал мне, что выполнение оператора SQL всегда помещает данные в ОЗУ / подкачку с помощью сервер базы данных. Таким образом, нецелесообразно выбирать большие наборы результатов. Я думал, что такой код мой ...
вопрос задан: 12 November 2010 16:37
0
ответов

Могу ли я сделать атрибут Moose «записывать один раз»?

Я хотел бы иметь необязательный атрибут Moose, который можно установить только один раз. Если я использую is => 'ro', я должен установить атрибут при создании объекта, но я хочу иметь возможность добавить его позже (...
вопрос задан: 12 November 2010 13:29
0
ответов

Почему построчная статистика для NYTProf не совпадает с итогами?

У меня есть сценарий Perl, запуск которого занимает около 30 минут, поэтому я, конечно, запускаю Devel :: НИТПроф. Отличный профайлер. По многим из моих сабов я получаю данные, которые не имеют для меня смысла. Я использую ...
вопрос задан: 11 November 2010 15:03
0
ответов

Как могу ли я создать каталог с «правильными» разрешениями, используя Perl mkdir?

Мне нужна помощь с этой программой. В рамках моего проекта мне нужно создать каталог. Я использовал для этого системную функцию, но Позже было сказано, что Perl имеет встроенную функцию mkdir. Я на ...
вопрос задан: 11 November 2010 14:57
0
ответов

Как мне получить имя файла и номер строки в Perl?

Я хотел бы получить текущее имя файла и номер строки в Perl-скрипте. Как мне это сделать? Например, в файле call test.pl: my $ foo = 'bar'; print 'Hello World'; print functionForFilename () ...
вопрос задан: 11 November 2010 14:39
0
ответов

Есть ли разница между // и m //?

I ' m новичок в Perl, так что это может быть очень глупый вопрос, но я не смог узнать :( Если у меня есть: $ stringA = ~ / regex /; $ stringB = ~ м / регулярное выражение /; Из моего теста $ stringA = $ stringB. Есть ли разница ...
вопрос задан: 10 November 2010 07:45
0
ответов

Лучший способ избежать «isn 't numeric in numeric eq (==) ”- предупреждение

#! / usr / bin / env perl использовать предупреждения; используйте 5.12.2; мой $ c = 'f'; # тоже может быть числом if ($ c eq 'd' || $ c == 9) {say "Hello, world!"; } Как лучше всего избежать 'Аргумент «f» не ...
вопрос задан: 9 November 2010 08:50
0
ответов

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

Допустим, у меня есть это: my% hash; $ hash {"a"} = "abc"; $ hash {"b"} = [1, 2, 3]; Как я могу позже узнать, было ли то, что было сохранено, скаляром, как в «abc», или массивом, как в [1, 2, 3]?
вопрос задан: 8 November 2010 20:34
0
ответов

Проверка строки с помощью регулярного выражения в / etc / passwd

Мне нужно проверить правильность файла / etc / passwd, и подумал, что регулярное выражение было бы хорошей идеей для проверки строк, не являющихся комментариями. Как мне проверить строку вроде: root: *: 0: 0: Системный администратор: / var / ...
вопрос задан: 7 November 2010 17:52
0
ответов

Что такое удобный модуль, который позволяет запрашивать базу данных MySQL из Perl?

Поиск в CPAN дал так много результатов, что я не знаю, с чего начать. Мне нужен простой и удобный модуль для базовых запросов.
вопрос задан: 7 November 2010 11:21
0
ответов

проверить, является ли число int или float

В perl я хочу проверить, содержит ли данная переменная число с плавающей запятой, равное not. Чтобы проверить это, я использую мой $ Var = 0.02 # Число с плавающей запятой if (int ($ Var)! = $ Var) {# с плавающей запятой ...
вопрос задан: 4 November 2010 05:06
0
ответов

Проблема компиляции ffmpeg: avcodec_find_decoder всегда возвращает null

Недавно я попытался обновить библиотеки ffmpeg, которые я использую в своем приложении Mac OS X, загрузив и скомпилировав ffmpeg из источника. Мой код правильно работает с предварительно скомпилированными библиотеками того же самого ...
вопрос задан: 3 November 2010 20:42