Описание тега perl-io
Ввод / вывод в Perl
2
ответа
Могу ли я получить ручку к источнику?
Похоже, в главном есть символ '_<-' (без кавычек) таким же образом, как и другие вещи, которые выглядят так, как будто они могут быть ручками: '_</usr/perl/lib/Carp.pm', например. Есть ли способ использовать это? Или мне придется использовать …
03 авг '12 в 20:14
4
ответа
Чтение небуферизованных данных из канала в Perl
Я пытаюсь прочитать данные без буфера из канала в Perl. Например, в программе ниже: open FILE,"-|","iostat -dx 10 5"; $old=select FILE; $|=1; select $old; $|=1; foreach $i (<FILE>) { print "GOT: $i\n"; } iostat выплевывает данные каждые 10 сек…
09 мар '12 в 15:29
4
ответа
Почему эта программа не находит слово "ошибка" в моем текстовом файле?
open(LOG,"logfile.txt") or die "Unable to open $logfile:$!"; print "\n"; while(<$LOG>){ print if /\berror\b/i; } close(LOG);
02 авг '10 в 22:54
2
ответа
Perl IO::File и использовать open qw(:utf8)
IO::File->open(), похоже, не учитывает использование open () в следующей программе, что странно для меня и, кажется, противоречит документации. Или, может быть, я делаю это неправильно. Переписать мой код, чтобы он не использовал IO:: File, не должн…
30 янв '13 в 02:20
2
ответа
IO:: Дескриптор для получения и отмены юникодных символов
Я думаю, что столкнулся с проблемой с Unicode и IO::Handle. Скорее всего, я делаю что-то не так. Я хочу получить и снять отдельные символы Юникода (не байты) из IO::Handle. Но я получаю удивительную ошибку. #!/usr/local/bin/perl use 5.016; use utf8;…
06 янв '13 в 05:59
1
ответ
Чтение одной строки из сокета домена Unix
У меня работает сервер socat с помощью этой команды: socat ABSTRACT-LISTEN:test123 PIPE Я могу открыть сокет для этого сервера, отправить одну строку, прочитать одну строку и распечатать его с помощью этого кода: #!/usr/bin/perl use strict; use warn…
02 май '17 в 13:09
12
ответов
Какой лучший способ открыть и прочитать файл в Perl?
Пожалуйста, обратите внимание - я не ищу "правильный" способ открыть / прочитать файл или способ, которым я должен открывать / читать файл каждый раз. Мне просто интересно узнать, каким образом большинство людей используют, и, возможно, изучить неск…
25 ноя '08 в 20:46
1
ответ
Заставить старую библиотеку работать с Perl XS и PerlIO
Я скорее новичок в XS, и я смотрю на изменение существующего модуля XS, который интенсивно использует лежащую в основе библиотеку C старше 15 лет (на самом деле этот модуль - просто клей для этой библиотеки). Проблема в том, что я хотел бы иметь воз…
05 июн '13 в 08:59
1
ответ
Недетерминированность в кодировании при использовании open() со скалярными и I/O слоями в Perl
Уже несколько часов я борюсь с ошибкой в моей программе Perl. Я не уверен, что я делаю что-то не так или интерпретатор делает, но код не является детерминированным, хотя он должен быть детерминированным, IMO. Также он демонстрирует то же поведение…
09 авг '14 в 03:27
0
ответов
Скопировать все файлы из папок и подпапок в perl?
Я хочу скопировать текстовый файл из всех папок и подпапок и хранить его в разных местах. Я пишу код, но он не работает. Он не может распознать подпапки. Он читает текст, но не распознает, является ли он файлом или папкой. КОД use File::Copy; use Fi…
25 мар '14 в 07:41
1
ответ
Perl Config::Tiny->read() не обрабатывает CRLF
Я использую Perl с Ubuntu под Windows 10. Я хочу использовать модуль Perl Config::Tiny для чтения имен файлов и других данных конфигурации. Когда я читаю файл конфигурации, созданный под Windows в Linux, он оставляет возврат каретки в конце значений…
25 окт '18 в 12:34
3
ответа
Как я могу перенаправить вывод функции die в файл на Perl?
Я хочу перенаправить die сообщения в отдельный файл, чтобы я мог сравнить этот файл позже, чтобы определить, что пошло не так. Но этот код дает мне ошибки: $ cat test.pl use strict; use warnings; my $log = "msglog.log"; die $log "DEAD$!"; $ perl tes…
15 окт '10 в 06:55
3
ответа
Как создать новый файл в Perl?
У меня есть некоторые значения, хранящиеся в переменных $a,$b,$c, Теперь я должен загрузить эти значения в новый файл (создать файл и загрузить). Я новичок в Perl, как я могу это сделать?
14 июн '12 в 10:38
1
ответ
Получать исключения из IO::File?
Модули IO::File, IO::Socket::INET имеют некоторые преимущества по сравнению с непосредственным использованием встроенных в Perl функций ввода-вывода, например, наличие явного синтаксиса для очистки дескриптора. Тем не менее, они, кажется, имеют неко…
19 дек '13 в 20:51
0
ответов
Встроенный Perl в C, Perlapio - совместимость с STDIO
Я только что понял, что слой PerlIO, кажется, делает нечто большее, чем просто (более или менее) легко оборачивает stdio.h-функции. Если я пытаюсь использовать файл-дескриптор, разрешенный с помощью PerlIO_stdout() а также PerlIO_fileno() с функциям…
09 янв '17 в 13:48
2
ответа
Почему этот код XS, который возвращает PerlIO*, имеет утечку?
Я пытаюсь написать некоторый код XS, который предоставляет фрагменты библиотеки для кода Perl в качестве потокового интерфейса, в который можно записать.get_stream Предполагается, что указанная ниже функция является конструктором, который подготавли…
04 окт '12 в 14:29
4
ответа
Необходимо напечатать последнее вхождение строки в Perl
У меня есть скрипт на Perl, который ищет ошибку, которая находится в файле конфигурации, но он распечатывает любое возникновение ошибки. Мне нужно сопоставить то, что находится в файле конфигурации, и распечатать только в последний раз, когда произо…
11 авг '10 в 23:29
3
ответа
Мониторинг внешнего процесса: выход, когда STDOUT соответствует шаблону
Я запускаю системную команду и жду вывода, соответствующего определенному шаблону, например: open(my $fh, '-|', 'echo line 1; sleep 20; echo line 2'); while (<$fh>) { print && last if /1/; } close $fh; Это напечатает line 1 и выйдите и…
29 май '14 в 07:41
2
ответа
Пытается открыть файл, расположенный на диске D, в командной строке с помощью Perl
Я пытаюсь изучить обработку файлов в Perl, я хочу открыть файл.txt, расположенный на диске D: на терминале Windows в режиме чтения, поэтому код, который я использую, выглядит так: open(DATA, "<D:/pay_info.txt") or die "Couldn't open file pay_info…
25 сен '18 в 10:58
1
ответ
Как проверить, работает ли PerlIO::fse с операторами проверки файлов?
#!/usr/local/bin/perl use warnings; use strict; use utf8; use Encode qw(encode); my $dir = '/data/Delibes, Léo'; if ( -d $dir ) { print "OK\n"; } if ( -d encode 'utf8', $dir ) { print "OK\n"; } Это печатает 2 раза OK; Я полагаю, это потому, что Perl…
27 сен '11 в 10:47