У меня проблемы с передачей и чтением аргументов внутри подпрограммы, которая, как ожидается, будет иметь два массива. sub two_array_sum {# two_array_sum ((1 2 3 4), (2, 4, 0, 1)) -> (3, 6, 3, 5) # Я ...
Я работаю над рекурсивным файлом -finding функция в Perl, которая должна возвращать массив имен файлов. Но что происходит, когда я пытаюсь их распечатать, я просто получаю 0. Что я делаю не так? use ...
Вот ситуация, с которой я столкнулся ... $ perl_scalar = decode_json (encode ('utf8', $ line)); decode_json возвращает ссылку. Я уверен, что это массив. Как узнать размер $ perl_scalar ?? Согласно ...
Как именно я могу передать обе скалярные переменные а переменные массива в подпрограмму на Perl? мой $ currVal = 1; мой $ currValTwo = 1; мой @currArray = ('один', 'два', 'три'); мой @currArrayTwo = ('один', 'два' ...
В C ++ я бы сделал что-то вроде этого: void some_func (const char * str, .. .);
some_func ("привет% сюр% d", "n00b", 420); В PHP я бы сделал так: function some_func ()
{$ args = func_get_args ();
...
Я использую Perl в Windows (Active Perl). У меня есть программа на Perl для глобализации файлов в текущей папке, и объединить их все с помощью команды dos copy, вызываемой изнутри с помощью system () ... Когда я выполняю, ...
У меня есть программа, предназначенная для извлечения строк из мультифаста и запуска их через THREADER: # ¡/ usr / bin / perl use warnings; использовать строгое; использовать File :: Temp qw (tempfile); мой $ filename = 'unchar_prot'; #открыть ...
Я пытаюсь подсчитать символы в строке и нашел простое решение, подсчитывающее один символ с помощью оператора tr. Теперь я хочу сделать это с каждым символом от a до z. Следующие...
У меня есть объект в моей модели представления у которого есть набор свойств, некоторые из них иногда будут иметь значение NULL. Я не хочу просто показывать некоторые элементы управления, если эти конкретные элементы управления равны нулю. Как бы мне пой
У нас есть очень дорогое вычисление, которое мы хотели бы кэшировать. Итак, мы делаем нечто подобное: my $result = $cache->get($key); если ($ результат) { $ результат = вычислить ($ ключ); $cache->...
У меня есть системный скрипт на perl . Мне нужен какой-то эквивалент bash -x, чтобы определить, что не так со скриптом. Есть что-нибудь эквивалентное? EDIT: bash -x печатает каждую строку ...
Я новичок в Perl, так что простите меня, если это действительно глупо, но я не могу этого понять. Если у меня есть такой массив: my @array = ({username => 'user1', email => 'user1 @ email'}, {username ...
Я использую SetEnv в Apache для установки некоторых переменных в виртуальных хостах, которые я восстанавливаю в PHP с помощью $ _SERVER [the_variable]. Сейчас я переключаюсь на Perl Catalyst и Nginx, но мне кажется, что директива env ...
Я нашел этот код и думаю, что он закодирован. Я пытался понять, как это закодировано или как я могу это прочитать. eval unpack u => q {_ (W5S92! W87) N: 6YG
Итак, я Я пытаюсь запустить этот код ... my $ filePath = $ ARGV ['0'];
if ($ filePath eq "") {print "Отсутствует аргумент!";
} Он должен проверить первый аргумент командной строки и сказать мне, пуст ли он, но он ...
Я пытаюсь понять подпрограммы Perl и как они работают.
Из perlsub я понимаю, что подпрограммы вызываются по ссылке и что необходимо присвоение (например, my (@copy) = @_;), чтобы превратить их в ...
У меня есть два изображения пластин дрожжей: Разрешающий: Xgal: к изображениям должен быть в том же месте и примерно том же размере. Я пытаюсь использовать одно из изображений, чтобы генерировать сетку и затем применить это...
У меня есть perl-скрипт, который я написал для рекурсивного поиска файлов в моих папках Windows. Я ввожу поисковый текст в качестве аргумента времени выполнения сценария perl, чтобы найти файл, содержащий этот текст '...
Моя модель содержит свойство с именем Title, а в моем Создание представления Я устанавливаю заголовок страницы с помощью ViewBag.Title. Это создает следующую проблему: форма, созданная Html.Editor, будет отображать текст ...
Я хочу заменить слово "синий" на "красный" "во всех текстовых файлах с именами 1_classification.dat, 2_classification.dat и так далее. Я хочу отредактировать тот же файл, поэтому попробовал этот код, но он не работает. Где я ...
У меня есть динамически сгенерированные строки, такие как @#@!efq@!#!, и я хочу удалить определенные символы из строку с помощью Perl. В настоящее время я делаю следующее (заменяя символы ничем):...
У меня есть строка который читается из текстового файла, но в Ubuntu Linux, и я пытаюсь удалить его символ новой строки с конца. Я использовал все способы. А вот для s/\n|\r/-/ (смотрю, находит ли...
Иногда я вижу такой код Perl: my ( $variable ) = blah.... Какой смысл заключать в скобки одну переменную? Я думал, что круглые скобки используются только при объявлении нескольких...
Вопрос 1: Я хочу передать массив функции. Но переданный аргумент изменяется в функции. Вызывается по значению? Вопрос 2: #my ($name, $num, @array)= @_; <=1 )
мое $имя = сдвиг; ...