У меня есть следующий сценарий Perl. Я пытаюсь запустить его в Windows 7 с помощью ActivePerl: #! C: \ Perl64 \ bin \ perl.exe -w use strict; мой $ mp3splt_exe = 'c: \ Program Files (x86) \ mp3splt \ mp3splt.exe'; my $ ...
У меня есть куча ленивых функций в объекте Moose. Некоторым строителям требуется время для завершения. Хочу отозвать всех строителей (дамп "бомбовый" объект).
Могу я сделать всех ленивыми ...
Я использую системный вызов для выполнения некоторых задач system('myframework mycode'); но он жалуется на отсутствие переменных окружения. Эти переменные окружения установлены в моей оболочке bash (откуда я запускаю ...
Предположим, у меня есть файл foo.txt со следующим содержанием: [2010-11-13 12: 00: 02,656]
[2010-11-13 12: 00: 02,701]
[2010-11-13 12: 00: 02,902] Когда я подтверждаю часть даты следующим образом, это работает: ...
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 (...
См. Обновление ниже Я просматриваю целую кучу сценариев Perl, написанных кем-то в моей компании. Он использовал соединение для объединения строк. Например, он это делает (взято из настоящего Perl-скрипта) ...
Я новичок в написании сценариев на Perl. Может ли кто-нибудь сказать мне, как найти последний индекс подстроки в строке, которая повторяется несколько раз в строке. На самом деле я хочу извлечь имя файла из файла ...
Я хочу применить функцию к каждому элементу списка и сохранить результаты, аналогичные map (function, list) в python. Пытался передать функцию на карту, но возникла эта ошибка: perl -le 'my $ s = sub {}; @r = карта ...
Я ищу хорошее руководство с последовательными и подробными шагами по установке Perl Strawberry, MySQL и DBD :: mysql в Windows XP. Основная цель, которую я хочу здесь достичь, - иметь возможность ...
Мне было интересно, знает ли кто-нибудь о хороших модулях Perl и / или классах Java для анализа настроений. Я читал о LingPipe, но в конечном итоге программу нужно будет использовать для коммерческого использования, поэтому ...
Мне нужно прочитать 2 даты и сравнить их. Одна дата - это current_date (год, месяц, число)
другой определяется бизнес-логикой.
Затем мне нужно сравнить 2 даты и посмотреть, не предшествует ли одна ...
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 ...
Это самый быстрый (время выполнения) способ найти самый длинный элемент в списке? #! / usr / bin / env perl use warnings; используйте 5.012; использовать List :: Util qw (уменьшить); используйте List :: Util :: XS; мой @array = qw (один два ...
Я запускаю обычную установку Windows на том Amazon EBS. Компьютеру требуется 10 минут для загрузки, что можно понять, поскольку требуется 2 перезагрузки. Однако создание снимка - это тоже 10-15 ...
В Perl, если у вас есть такой цикл: foreach (@items) {perform_action ( $ _);
} вы можете заменить его вызовом map в пустом контексте: map {perform_action ($ _)
} @Предметы; Есть ли какие-нибудь ...
Я работаю над проектом в ядре Linux, и я хотел знать, что делает этот checkstack.pl? Я никогда не изучал Perl, поэтому не могу понять программу. Было бы здорово, если бы я смог разобраться в программе ...
Коллега сказал мне, что выполнение оператора SQL всегда помещает данные в ОЗУ / подкачку с помощью сервер базы данных. Таким образом, нецелесообразно выбирать большие наборы результатов. Я думал, что такой код мой ...
Я хотел бы иметь необязательный атрибут Moose, который можно установить только один раз. Если я использую is => 'ro', я должен установить атрибут при создании объекта, но я хочу иметь возможность добавить его позже (...
У меня есть сценарий Perl, запуск которого занимает около 30 минут, поэтому я, конечно, запускаю Devel :: НИТПроф. Отличный профайлер. По многим из моих сабов я получаю данные, которые не имеют для меня смысла. Я использую ...
Мне нужна помощь с этой программой. В рамках моего проекта мне нужно
создать каталог. Я использовал для этого системную функцию, но
Позже было сказано, что Perl имеет встроенную функцию mkdir. Я на ...
Я хотел бы получить текущее имя файла и номер строки в Perl-скрипте. Как мне это сделать? Например, в файле call test.pl: my $ foo = 'bar';
print 'Hello World';
print functionForFilename () ...
I ' m новичок в Perl, так что это может быть очень глупый вопрос, но я не смог узнать :( Если у меня есть: $ stringA = ~ / regex /;
$ stringB = ~ м / регулярное выражение /; Из моего теста $ stringA = $ stringB. Есть ли разница ...
#! / usr / bin / env perl
использовать предупреждения;
используйте 5.12.2; мой $ c = 'f'; # тоже может быть числом if ($ c eq 'd' || $ c == 9) {say "Hello, world!";
} Как лучше всего избежать 'Аргумент «f» не ...
Допустим, у меня есть это: my% hash; $ hash {"a"} = "abc";
$ hash {"b"} = [1, 2, 3]; Как я могу позже узнать, было ли то, что было сохранено, скаляром, как в «abc», или массивом, как в [1, 2, 3]?
Мне нужно проверить правильность файла / etc / passwd, и подумал, что регулярное выражение было бы хорошей идеей для проверки строк, не являющихся комментариями. Как мне проверить строку вроде: root: *: 0: 0: Системный администратор: / var / ...
В perl я хочу проверить, содержит ли данная переменная число с плавающей запятой, равное not. Чтобы проверить это, я использую мой $ Var = 0.02 # Число с плавающей запятой if (int ($ Var)! = $ Var) {# с плавающей запятой ...
Недавно я попытался обновить библиотеки ffmpeg, которые я использую в своем приложении Mac OS X, загрузив и скомпилировав ffmpeg из источника. Мой код правильно работает с предварительно скомпилированными библиотеками того же самого ...
Был опубликован вопрос о связанных операторах сравнения и о том, как они интерпретируются на разных языках. Объединение операторов сравнения означает, что (x