perlfaq

СОДЕРЖАНИЕ

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

НАЗВАНИЕ

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

ВЕРСИЯ

версия 5.20210520

ОПИСАНИЕ

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?

• Как написать GUI (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 или f-строк в Python?

• В чём проблема с всегда неизменной цитировкой "$vars"?

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

• В чём разница между операторами "delete" и "undef" в отношении хэшей?

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

• Как перезапустить операцию each() на части пути?

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

• Как выполнить write() в строку?

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

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

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

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

• Как открыть файл с именем, начинающимся с ">" или содержащим заключительные пробелы?

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

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

• Почему я не могу просто открыть(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 DFА или NFA? Соответствуют ли они стандарту POSIX?

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

• Как вывести что-то в цвете?

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

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

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

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

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

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

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

• Как запустить процесс в фоновом режиме?

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

• Как сделать system() завершающимся при нажатии Ctrl+C?

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

• Как извлечь URL?

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

• Как выполнить RPC в Perl?

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

Tom Christiansen написал оригинальный perlfaq, затем расширил его с помощью Nat Torkington. brian d foy существенно отредактировал и расширил perlfaq. perlfaq-workers и другие также предоставляли отзывы, исправления и дополнения на протяжении многих лет.

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

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

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