perlfaq

СОДЕРЖАНИЕ

• НАЗВАНИЕ
• ВЕРСИЯ
• ОПИСАНИЕ
  • Где найти perlfaq
  • Как использовать perlfaq
  • Как внести вклад в perlfaq
  • Что делать, если мой вопрос не раскрыт в FAQ?
• ТАБЛИЦА СОДЕРЖАНИЯ
• ВОПРОСЫ
  • perlfaq1: Общие вопросы о Perl
  • perlfaq2: Получение и изучение Perl
  • perlfaq3: Средства разработки
  • perlfaq4: Обработка данных
  • perlfaq5: Файлы и форматы
  • perlfaq6: Регулярные выражения
  • perlfaq7: Общие вопросы языка Perl
  • perlfaq8: Взаимодействие с системой
  • perlfaq9: Веб, почта и сети
• АВТОРСКИЕ ПРАВА
• АВТОР И АВТОРСКИЕ ПРАВА

НАЗВАНИЕ

perlfaq - Часто задаваемые вопросы о Perl

ВЕРСИЯ

версия 5.20210411

ОПИСАНИЕ

perlfaq состоит из нескольких документов, отвечающих на наиболее часто задаваемые вопросы о Perl и программировании на Perl. Он разделен по темам на девять основных разделов, описанных в этом документе.

Где найти perlfaq

Perlfaq — это развивающийся документ. Читайте последнюю версию по адресу https://perldoc.perl.org/perlfaq. Он также входит в стандартную поставку Perl.

Как использовать perlfaq

Инструмент командной строки perldoc входит в стандартную поставку Perl. Чтобы прочитать perlfaq:

$ perldoc perlfaq

Чтобы найти заголовки вопросов perlfaq:

$ perldoc -q open

Как внести вклад в perlfaq

Просмотрите https://github.com/perl-doc-cats/perlfaq/wiki. Если ваш вариант не найден, создайте вопрос или запрос на внесение изменений в https://github.com/perl-doc-cats/perlfaq.

После утверждения изменения будут распространяться с последующим выпуском Perl и затем появятся по адресу https://perldoc.perl.org/perlfaq.

Что делать, если мой вопрос не раскрыт в FAQ?

Попробуйте ресурсы в perlfaq2.

ТАБЛИЦА СОДЕРЖАНИЯ

perlfaq1 - Общие вопросы о Perl

perlfaq2 - Получение и изучение Perl

perlfaq3 - Средства разработки

perlfaq4 - Обработка данных

perlfaq5 - Файлы и форматы

perlfaq6 - Регулярные выражения

perlfaq7 - Общие вопросы языка Perl

perlfaq8 - Взаимодействие с системой

perlfaq9 - Веб, почта и сети

ВОПРОСЫ

perlfaq1: Общие вопросы о Perl

Этот раздел FAQ отвечает на очень общие, высокоуровневые вопросы о Perl.

• Что такое Perl?

• Кто поддерживает Perl? Кто его разрабатывает? Почему он бесплатный?

• Какую версию Perl следует использовать?

• Что такое Perl 4, Perl 5 или Raku (Perl 6)?

• Что такое Raku (Perl 6)?

• Насколько стабилен Perl?

• Как часто выпускаются новые версии Perl?

• Сложно ли освоить Perl?

• Как Perl сравнивается с другими языками, такими как Java, Python, REXX, Scheme или Tcl?

• Можно ли выполнить [задачу] в Perl?

• Когда не стоит программировать на Perl?

• В чем разница между "perl" и "Perl"?

• Что такое JAPH?

• Как можно убедить других использовать Perl?

perlfaq2: Получение и изучение Perl

Этот раздел FAQ отвечает на вопросы о том, где найти исходный код и документацию для Perl, поддержку и связанные вопросы.

• Какие машины поддерживают Perl? Где его получить?

• Как получить двоичную версию Perl?

• У меня нет компилятора C. Как я могу скомпилировать свой собственный интерпретатор Perl?

• Я скопировал двоичный файл Perl с одной машины на другую, но скрипты не работают.

• Я взял исходные коды и попытался скомпилировать, но gdbm/динамическая загрузка/malloc/связывание/... не удалось. Как заставить это работать?

• Какие модули и расширения доступны для Perl? Что такое CPAN?

• Где можно получить информацию о Perl?

• Что такое perl.com? Perl Mongers? pm.org? perl.org? cpan.org?

• Где можно задавать вопросы?

• Книги по Perl

• В каких журналах есть статьи о Perl?

• Какие блоги Perl стоит читать?

• Какие рассылки новостей есть для Perl?

• Где можно купить коммерческую версию Perl?

• Куда отправлять сообщения об ошибках?

perlfaq3: Средства разработки

Этот раздел FAQ отвечает на вопросы, связанные с инструментами разработчика и поддержкой программирования.

• Как сделать (что-нибудь)?

• Как использовать Perl интерактивно?

• Как найти установленные модули на моей системе?

• Как отлаживать программы на Perl?

• Как профилировать программы на Perl?

• Как выполнить перекрестную проверку моих программ на Perl?

• Существует ли красивое форматирование (форматировщик) для Perl?

• Существует ли IDE или редактор Perl для Windows?

• Где можно получить макросы Perl для vi?

• Где можно получить perl-mode или cperl-mode для emacs?

• Как использовать curses с Perl?

• Как написать графический интерфейс пользователя (X, Tk, Gtk и т.д.) на Perl?

• Как ускорить выполнение программы на Perl?

• Как уменьшить потребление памяти моей программы на Perl?

• Безопасно ли возвращать ссылку на локальные или лексические данные?

• Как освободить массив или хеш, чтобы программа уменьшилась?

• Как сделать свой CGI-скрипт более эффективным?

• Как скрыть исходный код программы на Perl?

• Как скомпилировать программу на Perl в байт-код или C?

• Как заставить #!perl работать на [MS-DOS,NT,...]?

• Можно ли писать полезные программы на Perl в командной строке?

• Почему однострочные программы Perl не работают на моей системе DOS/Mac/VMS?

• Где можно узнать о CGI или веб-программировании на Perl?

• Где можно узнать об объектно-ориентированном программировании на Perl?

• Где можно узнать о связывании C с Perl?

• Я прочитал perlembed, perlguts и т.д., но не могу встроить perl в свою программу на C; что я делаю не так?

• Когда я попытался запустить свой скрипт, я получил это сообщение. Что это значит?

• Что такое MakeMaker?

perlfaq4: Обработка данных

Этот раздел FAQ отвечает на вопросы, связанные с обработкой чисел, дат, строк, массивов, хешей и различными вопросами обработки данных.

• Почему я получаю длинные десятичные дроби (например, 19.9499999999999) вместо ожидаемых чисел (например, 19.95)?

• Почему функция int() не работает?

• Почему мои данные в восьмеричном формате не интерпретируются правильно?

• Есть ли в Perl функция round()? А как насчёт ceil() и floor()? Есть ли функции тригонометрических функций?

• Как преобразовать числовые представления/системы счисления/основания?

• Почему оператор & работает не так, как мне нужно?

• Как умножить матрицы?

• Как выполнить операцию над последовательностью целых чисел?

• Как вывести римские цифры?

• Почему мои случайные числа не случайны?

• Как получить случайное число между X и Y?

• Как найти день или неделю года?

• Как найти текущий век или тысячелетие?

• Как сравнить две даты и найти разницу?

• Как преобразовать строку в количество эпохальных секунд?

• Как найти юлианский день?

• Как найти дату вчерашнего дня?

• Есть ли в Perl проблема с годом 2000 или 2038? Perl совместим с Y2K?

• Как валидировать входные данные?

• Как разэкранировать строку?

• Как удалить последовательные пары символов?

• Как расширить вызовы функций в строке?

• Как найти соответствующие/вложенные элементы?

• Как перевернуть строку?

• Как расширить табуляции в строке?

• Как переформатировать абзац?

• Как получить доступ к N символам строки или изменить их?

• Как изменить N-тое вхождение чего-либо?

• Как посчитать количество вхождений подстроки в строке?

• Как сделать заглавными все слова в строке?

• Как разбить строку, ограниченную символом [символ], но не внутри него?

• Как удалить пробелы в начале и конце строки?

• Как дополнить строку пробелами или число нулями?

• Как извлечь выбранные столбцы из строки?

• Как найти значение Soundex для строки?

• Как расширить переменные в текстовых строках?

• Есть ли в Perl что-то подобное Ruby's #{} или Python's f-строке?

• В чём проблема всегда заключать «$vars» в кавычки?

• Почему мои документы <<HERE не работают?

• В чём разница между списком и массивом?

• В чём разница между $array[1] и @array[1]?

• Как удалить дубликаты элементов из списка или массива?

• Как проверить, содержится ли определённый элемент в списке или массиве?

• Как вычислить разность двух массивов? Как вычислить пересечение двух массивов?

• Как проверить, равны ли два массива или два хэша?

• Как найти первый элемент массива, для которого условие истинно?

• Как обработать связанные списки?

• Как обработать циклические списки?

• Как случайным образом перемешать массив?

• Как обработать/изменить каждый элемент массива?

• Как выбрать случайный элемент из массива?

• Как переставить N элементов списка?

• Как отсортировать массив по (любому) критерию?

• Как манипулировать массивами битов?

• Почему функция defined() возвращает true для пустых массивов и хэшей?

• Как обработать весь хэш?

• Как объединить два хэша?

• Что происходит, если добавлять или удалять ключи из хэша во время итерации по нему?

• Как найти элемент хэша по значению?

• Как узнать, сколько элементов в хэше?

• Как отсортировать хэш (по желанию, по значению, а не ключу)?

• Как всегда поддерживать хэш в отсортированном виде?

• В чём разница между «delete» и «undef» при работе с хэшами?

• Почему мои привязанные хэши не делают различие между defined/exists?

• Как перенастроить операцию each() в процессе её выполнения?

• Как получить уникальные ключи из двух хэшей?

• Как сохранить многомерный массив в файле DBM?

• Как заставить хэш запоминать порядок ввода элементов?

• Почему передача подпрограмме неопределённого элемента хэша создаёт его?

• Как создать в Perl эквивалент C-структуры/C++-класса/хэша или массива хэшей или массивов?

• Как использовать ссылку в качестве ключа хэша?

• Как проверить, существует ли ключ в многоуровневом хэше?

• Как предотвратить добавление нежелательных ключей в хэш?

• Как правильно обрабатывать двоичные данные?

• Как определить, является ли скаляр числом/целым числом/дробным числом?

• Как сохранить постоянные данные между вызовами программы?

• Как вывести или скопировать рекурсивную структуру данных?

• Как определить методы для каждого класса/объекта?

• Как проверить контрольную сумму кредитной карты?

• Как упаковать массивы двойных или плавающих точек для кода XS?

perlfaq5: Файлы и Форматы

Этот раздел посвящён вводу-выводу и проблемам с «f»: файловым дескрипторам, сбросу, форматам и подвалам.

• Как сбросить/отключить буферизацию файлового дескриптора вывода? Почему это необходимо?

• Как изменить, удалить или вставить строку в файл или добавить в начало файла?

• Как посчитать количество строк в файле?

• Как удалить последние N строк из файла?

• Как использовать опцию -i Perl внутри программы?

• Как скопировать файл?

• Как создать временное имя файла?

• Как манипулировать файлами с фиксированной длиной записи?

• Как сделать файловый дескриптор локальным для подпрограммы? Как передавать файловые дескрипторы между подпрограммами? Как создать массив файловых дескрипторов?

• Как использовать файловый дескриптор косвенно?

• Как открыть файловый дескриптор для строки?

• Как настроить формат подвала для использования с write()?

• Как записать данные в строку с помощью write()?

• Как вывести числа с запятыми?

• Как преобразовать тильды (~) в имени файла?

• Почему при открытии файла для чтения и записи он иногда очищается?

• Почему иногда появляется ошибка «Список аргументов слишком длинный» при использовании <*>?

• Как открыть файл, имя которого начинается с «>» или содержит конечные пробелы?

• Как надёжно переименовать файл?

• Как заблокировать файл?

• Почему не работает просто open(FH, ">file.lock")?

• Не получается заблокировать. Мне нужно просто увеличить число в файле. Как это сделать?

• Мне нужно только добавить небольшой текст в конец файла. Нужно ли использовать блокировку?

• Как случайным образом обновить двоичный файл?

• Как получить метку времени файла в Perl?

• Как установить метку времени файла в Perl?

• Как выводить данные в несколько файлов одновременно?

• Как прочитать весь файл сразу?

• Как прочитать файл по абзацам?

• Как прочитать один символ из файла? С клавиатуры?

• Как узнать, есть ли символ в очереди на файловом дескрипторе?

• Как сделать tail -f в Perl?

• Как продублировать файловый дескриптор в Perl?

• Как закрыть файловый дескриптор по номеру?

• Почему нельзя использовать «C:\temp\foo» в путях DOS? Почему «C:\temp\foo.exe» не работает?

• Почему glob("*.*") не получает все файлы?

• Почему Perl позволяет удалять файлы только для чтения? Почему -i перезаписывает защищённые файлы? Разве это ошибка в Perl?

• Как выбрать случайную строку из файла?

• Почему при выводе массива строк появляются странные пробелы?

• Как пройтись по дереву каталогов?

• Как удалить дерево каталогов?

• Как скопировать целое дерево каталогов?

perlfaq6: Регулярные Выражения

Этот раздел неожиданно небольшой, потому что остальная часть FAQ содержит ответы, использующие регулярные выражения. Например, декодирование URL-адреса и проверка, является ли что-то числом, можно выполнить с помощью регулярных выражений, но эти ответы находятся в других частях этого документа (в perlfaq9 : «Как декодировать или создать эти %-кодировки в веб-страницах» и perlfaq4 : «Как определить, является ли скаляр числом/целым/дробным», соответственно).

• Как использовать регулярные выражения, не создавая нечитаемый и плохо поддерживаемый код?

• У меня проблемы с сопоставлением строк, которые занимают более одной строки. В чём проблема?

• Как извлечь строки между двумя шаблонами, которые находятся на разных строках?

• Как сопоставить XML, HTML или другие сложные и некрасивые вещи с помощью регулярного выражения?

• Я установил регулярное выражение в $/ , но оно не сработало. В чём проблема?

• Как выполнить замену без учёта регистра в левой части, сохранив регистр в правой части?

• Как заставить \w соответствовать национальным наборам символов?

• Как создать локально-чувствительную версию /[a-zA-Z]/ ?

• Как привести переменную к виду, используемому в регулярном выражении?

• Что такое /o на самом деле?

• Как использовать регулярное выражение для удаления комментариев C-стиля из файла?

• Можно ли использовать регулярные выражения Perl для сопоставления сбалансированного текста?

• Что означает, что регулярные выражения жадные? Как обойти эту проблему?

• Как обработать каждое слово в каждой строке?

• Как получить сводку частоты слов или строк?

• Как выполнить приближённое сопоставление?

• Как эффективно сопоставить множество регулярных выражений одновременно?

• Почему поиск по границам слов с \b не работает?

• Почему использование $&, $`, или $' замедляет программу?

• Что такое \G в регулярном выражении?

• Являются ли регулярные выражения Perl DFA или NFA? Соответствуют ли они стандарту POSIX?

• В чём проблема использования grep в контексте void?

• Как сопоставить строки с многобайтовыми символами?

• Как сопоставить регулярное выражение, находящееся в переменной?

perlfaq7: Общие проблемы языка Perl

Этот раздел посвящён общим проблемам языка Perl, которые не явно не вписываются в другие разделы.

• Могу ли я получить BNF/yacc/RE для языка Perl?

• Что означают все эти знаки препинания $@%&* и как я узнаю, когда их использовать?

• Всегда ли мне нужно заключать свои строки в кавычки или использовать точки с запятой и запятые?

• Как пропустить некоторые возвращаемые значения?

• Как временно заблокировать предупреждения?

• Что такое расширение?

• Почему операторы Perl имеют другой приоритет, чем операторы C?

• Как объявить/создать структуру?

• Как создать модуль?

• Как принять или перенять модуль, уже находящийся на CPAN?

• Как создать класс?

• Как проверить, является ли переменная заражённой?

• Что такое замыкание?

• Что такое самоубийство переменной и как его предотвратить?

• Как передать/возвратить {Функцию, дескриптор файла, массив, хеш, метод, регулярное выражение}?

• Как создать статическую переменную?

• В чём разница между динамическим и лексическим (статическим) охватом? Между local() и my()?

• Как получить доступ к динамической переменной, когда лексическая переменная с таким же именем находится в области видимости?

• В чём разница между глубокой и мелкой привязкой?

• Почему «my($foo) = <$fh>;» не работает правильно?

• Как переопределить встроенную функцию, оператор или метод?

• В чём разница между вызовом функции как &foo и foo()?

• Как создать оператор switch или case?

• Как перехватить обращения к неопределённым переменным, функциям или методам?

• Почему метод, включённый в этот же файл, не находится?

• Как узнать свой текущий или вызывающий пакет?

• Как закомментировать большой блок кода Perl?

• Как очистить пакет?

• Как использовать переменную в качестве имени переменной?

• Что означает «плохой интерпретатор»?

• Нужно ли перекомпилировать модули XS при изменении библиотеки C?

perlfaq8: Взаимодействие с системой

Этот раздел FAQ Perl посвящён вопросам, связанным с взаимодействием с операционной системой. Тематика включает межпроцессное взаимодействие (IPC), управление пользовательским интерфейсом (клавиатура, экран и указательные устройства) и всё остальное, что не связано с обработкой данных.

• Как узнать, под какой операционной системой я работаю?

• Почему exec() не возвращает значение?

• Как выполнить сложные операции с клавиатурой/экраном/мышью?

• Как вывести что-нибудь цветным?

• Как прочитать только один символ с клавиатуры без ожидания нажатия клавиши ввода?

• Как проверить, готов ли ввод с клавиатуры?

• Как очистить экран?

• Как получить размер экрана?

• Как попросить пользователя ввести пароль?

• Как читать и писать в последовательный порт?

• Как декодировать зашифрованные файлы паролей?

• Как запустить процесс на заднем плане?

• Как перехватить управляющие символы/сигналы?

• Как изменить файл паролей shadow в системе Unix?

• Как установить время и дату?

• Как сделать sleep() или alarm() меньше секунды?

• Как измерить время меньше секунды?

• Как выполнить atexit() или setjmp()/longjmp()? (Обработка исключений)

• Почему моя программа с сокетами не работает в System V (Solaris)? Что означает сообщение об ошибке «Протокол не поддерживается»?

• Как вызвать уникальные функции C моей системы из Perl?

• Где получить заголовочные файлы для ioctl() или syscall()?

• Почему скрипты Perl с setuid жалуются на проблемы ядра?

• Как открыть канал связи, позволяющий одновременно ввод и вывод в команду?

• Почему я не могу получить вывод команды с помощью system()?

• Как захватить STDERR внешней команды?

• Почему open() не возвращает ошибку при неудачном открытии канала?

• Что не так с использованием обратных кавычек в контексте без значения?

• Как вызвать обратные кавычки без обработки оболочки?

• Почему мой скрипт не может читать из STDIN после того, как я передал ему EOF (^D в Unix, ^Z в MS-DOS)?

• Как преобразовать мой скрипт оболочки в Perl?

• Можно ли использовать Perl для запуска сеансов telnet или ftp?

• Как написать expect на Perl?

• Есть ли способ скрыть командную строку Perl от программ, таких как «ps»?

• Я {изменил каталог, модифицировал свою среду} в скрипте Perl. Почему изменения исчезли при выходе из скрипта? Как сделать так, чтобы изменения были видны?

• Как закрыть дескриптор файла процесса без ожидания его завершения?

• Как создать демонический процесс с помощью fork?

• Как определить, работаю ли я в интерактивном режиме?

• Как задать таймаут для медленного события?

• Как установить ограничения на использование процессора?

• Как избежать появления процессов-зомби в системе Unix?

• Как использовать базу данных SQL?

• Как заставить system() выйти при нажатии Ctrl+C?

• Как открыть файл без блокировки?

• Как отличить ошибки оболочки от ошибок Perl?

• Как установить модуль с помощью CPAN?

• В чём разница между require и use?

• Как сохранить свой каталог модулей/библиотек?

• Как добавить каталог, в котором находится моя программа, в путь поиска модулей/библиотек?

• Как добавить каталог в путь включения (@INC) во время выполнения?

• Где устанавливаются модули?

• Что такое socket.ph и где его получить?

perlfaq9: Веб, электронная почта и сети

Этот раздел содержит вопросы, связанные с запуском веб-сайтов, отправкой и получением электронной почты, а также общей сетевой деятельностью.

• Стоит ли использовать веб-фреймворк?

• Какой веб-фреймворк следует использовать?

• Что такое Plack и PSGI?

• Как удалить HTML из строки?

• Как извлечь URL-адреса?

• Как получить файл HTML?

• Как автоматизировать отправку веб-формы?

• Как декодировать или создать кодировку % в веб-среде?

• Как перенаправить на другую страницу?

• Как защитить свои веб-страницы паролем?

• Как убедиться, что пользователи не могут вводить данные в форму, которые могут привести к выполнению вредоносного кода в моём скрипте CGI?

• Как разобрать заголовок письма?

• Как проверить корректность адреса электронной почты?

• Как декодировать строку MIME/BASE64?

• Как найти адрес электронной почты пользователя?

• Как отправить электронное письмо?

• Как использовать MIME для добавления вложение в сообщение?

• Как прочитать электронное письмо?

• Как узнать своё имя хоста, домен или IP-адрес?

• Как получить/записать файл (S)FTP?

• Как реализовать RPC на Perl?

АВТОРСКИЕ ПРАВА

Том Кристиансен написал оригинальный perlfaq, а затем расширил его с помощью Ната Торкинтона. brian d foy существенно отредактировал и расширил perlfaq. perlfaq-workers и другие также предоставили отзывы, исправления и исправления с течением времени.

АВТОР И АВТОРСКИЕ ПРАВА

Том Кристиансен написал оригинальную версию этого документа. brian d foy <bdfoy@cpan.org> написал эту версию. См. отдельные документы perlfaq для дополнительной информации об авторских правах.

Этот документ доступен на тех же условиях, что и Perl сам по себе. Примеры кода во всех документах perlfaq являются общественным достоянием. Используйте их по своему усмотрению (и на свой страх и риск без гарантий от кого-либо).