perl — все вопросы
3ответа
10 голосов
Что мне делать, если метод Moose Builder не работает?
Как лучше всего обработать ошибку в методе компоновщика?
Например:
package MyObj;
use Moose;
use IO::File;
has => 'file_name' ( is => 'ro', isa => 'Str', required =>1 );
2ответа
10 голосов
Как сохранить файл как UTF-8 из Perl?
Я пытаюсь создать /сохранить HTML-файлы в Perl в UTF-8, но пока ничего, что я сделал, не работает. предыдущий ответ здесь, на SO , сказал использовать binmode, поэтому Я попробовал это. Вот мой код
4ответа
10 голосов
Можно ли в Perl вызывать метод перед выполнением каждой функции в пакете?
Я пишу модуль и хочу, чтобы перед каждой из функций в нем выполнялся определенный фрагмент кода.
Как мне это сделать?
Нет ли другого способа, кроме простого вызова функции в начале каждой функ
5ответов
10 голосов
Подклассы Perl наследуют импортированные модули и прагмы?
Допустим, у вас есть родительский класс Perl в одном файле:
#!/usr/bin/perl
package Foo;
use strict;
use warnings;
use Data::Dumper;
sub new{
my $class = shift;
my %self = ();
return
3ответа
10 голосов
Используя Perl, как мне декодировать или создавать эти% -кодировки в Интернете?
Мне нужно обрабатывать кодирование и декодирование URI (т.е. процентов) в моем скрипте Perl. Как мне это сделать?
Это вопрос от официального perlfaq . Мы импортируем perlfaq в Stack Overflow .
2ответа
10 голосов
бинарный поиск по массиву в Perl
У меня есть массив шестнадцатеричных чисел, и мне нужно просмотреть другие числа и проверить, присутствуют ли они в этом массиве. Сейчас я использую цикл foreach, который каждый раз проходит по всем
1ответ
10 голосов
Perl scoping и жизнь локальных переменных
Сколько времени занимает область памяти, выделенная локальной переменной в Perl (как для массивов, так и для хэшей и скаляров)? Например:
sub routine
{
my $foo = "bar";
return \$foo;
}
2ответа
10 голосов
Передайте регулярное выражение в подпрограмму Perl
Ситуация
Я нахожусь в процессе создания простого файла шаблона, который поможет в создании будущих сценариев для выполнения различных задач через командную строку в системах * nix. Как часть этог
3ответа
10 голосов
Чтение вывода команды в массив Perl
Я хочу получить вывод команды в массив - вот так:
my @output = `$cmd`;
но похоже, что выходные данные команды не попадают в массив @output.
Есть идеи, куда это идет?
3ответа
10 голосов
Почему работает оператор козла?
Разница между массивами и списками, а также между списком и скалярным контекстом обсуждалась в сообществе Perl в прошлом году (и на самом деле каждый год). Я прочитал статьи из chromatic и friedo
3ответа
10 голосов
В Perl, как я могу узнать, используется ли мой файл в качестве модуля или запускается как скрипт?
Допустим, у меня есть файл Perl, в котором есть части, которые мне нужно запускать, только когда меня вызывают как скрипт. Я помню, как читал некоторое время назад о включении этих частей в метод ma
4ответа
10 голосов
Как реализовать таблицу диспетчеризации в модуле Perl OO?
Я хочу поместить некоторые подпрограммы, которые находятся в пакете OO, в массив - также внутри пакета - для использования в качестве таблицы диспетчеризации. Как то так
package Blah::Blah;
use f
9ответов
10 голосов
Как я могу ssh внутри сценария Perl?
Я хочу подключиться к серверу по SSH и выполнить простую команду, такую как «id», получить выходные данные и сохранить их в файле на моем основном сервере. У меня нет прав для установки Net :: SSH
1ответ
10 голосов
Не удается найти CPAN.pm в @INC (@INC содержит: /usr /local /lib /perl5 /usr /local /share /perl5
Я пытался установить некоторые модули на новый сервер (Fedora Core 18), но я держу пари, что эта ошибка
Can't locate CPAN.pm in @INC (@INC contains: /usr/local/lib/perl5 /usr/local/share/perl5 /us
5ответов
10 голосов
Почему в моем коде Perl меня «вызывают слишком рано, чтобы проверить прототип»?
У меня есть такой Perl-файл:
use strict;
f1();
sub f3()
{ f2(); }
sub f1()
{}
sub f2()
{}
Короче говоря, f1 вызывается до его определения. Итак, Perl выдает предупреждение: «f1 вызван слишком
9ответов
10 голосов
Как я могу создать 1000 файлов, которые я могу использовать для тестирования скрипта?
Я хотел бы создать более 1000 текстовых файлов с некоторым текстом для тестирования скрипта, как создать это много, если текстовые файлы на ходу, с использованием сценария оболочки или Perl. Пожалуйс
5ответов
10 голосов
Как я могу сделать 64-битную арифметику в Perl?
Я новичок в Perl,
Могу ли я просто использовать 64-битную арифметику в Perl?
Например
$operand1 = 0xFFFFFFFFFFFF; # 48 bit value
$operand2 = 0xFFFFFFFFFFFF; # 48 bit value
$Result = $op
4ответа
10 голосов
Как получить perl -c для выдачи неопределенных или необъявленных ошибок функций?
Исходя из опыта C ++, я неукоснительно использую use strict и use warnings особенности Perl:
#!/usr/bin/perl -w
use strict;
use warnings;
$foo = 1; #Throws "$foo" requires explicit package name e
6ответов
10 голосов
Как проверить, установлен ли модуль Perl? [Дубликат]
На этот вопрос уже есть ответ здесь:
Как проверить, есть ли у меня Модуль Perl перед его использованием?
6 ответов
3ответа
10 голосов
Как мне сжать gzip строку в Perl
У меня есть строка, которую я хотел бы сжать с помощью GZip перед вставкой в базу данных как BLOB. Однако, похоже, что все встроенные модули GZip Perl предназначены для сжатия файлов, а не встроен