Результаты поиска по запросу "perl"
является
огу сказать #include <stdio.h> #include <unistd.h> #include <signal.h> int continue_running = 1; void handler(int signal, siginfo_t* info, void* data) { printf("got signal %d from process %d running as user %d\n", signal, info->si_pid, ...
вместо. Эта ошибка когда-нибудь будет исправлена, но в то же время люди получают предупреждение об изменении своего неверного кода.
рабатываю скрипт, который повторно использует действительно старый кусок Perl-кода. Эта строка все еще выдает ошибку. Использование хэша в качестве ссылки не рекомендуется. %hash->{$_[$counter]} = $_[$counter+1];Как я должен реорганизовать этот ...
Это рутина:
менно я могу передать как скалярные переменные, так и переменные массива в подпрограмму в Perl? my $currVal = 1; my $currValTwo = 1; my @currArray = ('one','two','three'); my @currArrayTwo =('one','two','three'); &mysub($currVal, ...
Или даже:
у сопоставить и назначить переменную в одну строку: my $abspath='/var/ftp/path/to/file.txt'; $abspath =~ #/var/ftp/(.*)$#; my $relpath=$1;Я уверен, что это должно быть легко.
Git commit hook - Как использовать commit-msg hook, чтобы проверить наличие строки в сообщении?
Мне нужно сделать ловушку commit-msg, чтобы проверить, содержит ли сообщение коммита «app.asana» в какой-либо части этого. Я искал некоторые ссылки и документацию, и я знаю, что для этого мне нужно использовать commit-msg. Я должен сделать это с ...
Как я могу рассматривать аргументы командной строки как UTF-8 в Perl?
Как мне относиться к элементам@ARGV как UTF-8 в Perl? В настоящее время я использую следующий обходной путь .. use Encode qw(decode encode); my $foo = $ARGV[0]; $foo = decode("utf-8", $foo); .. который работает, но не очень элегантно. Я ...
Как мне использовать ключевое слово «my» в Perl?
Я постоянно вижу ключевое слово «my» перед именами переменных в примерах сценариев Perl онлайн, но я понятия не имею, что это значит. Я пытался читать страницы справочника и другие сайты в Интернете, но мне трудно понять, для чего это нужно, ...
Работал для меня!
ел бы отправить вывод команды как в STDOUT, так и в переменную. Я хочу объединить: my $var = `some command` ; system( 'some command' ) ;тройник [http://metacpan.org/pod/Tee]это шаг в правильном направлении, но он отправляет его в файл, а не в ...
+1 за вариант без перла.
ужна помощь в настройке моего кода для поиска другого атрибута в этом Unixdf выход: Ex. Filesystem Size Used Avail Capacity Mounted on /dev/ad4s1e 61G 46G 9.7G 83% /homeДо сих пор я могу извлечь емкость, но теперь я хочу добавить ВВО. Вот моя ...
они очень вкусные :)
я есть это регулярное выражение: if($string =~ m/^(Clinton|[^Bush]|Reagan)/i) {print "$string\n"};Я хочу сравниться с Клинтоном и Рейганом, но не с Бушем. Это не работает.