navigation - lev@http://lev.lfs06.ru:perl

./perl/posts/pb11

 Глава 11 Ссылки и записи * введение * 11.1. Ссылки на массивы * 11.2. Создание хэшей массивов * 11.3. Получение ссылок на хэши * 11.4. Получение ссылок па функции * 11.5. Получение ссылок на скаляры * 11.6. Создание массивов ссылок на скаляры * 11.7. Применение замыканий вместо объектов * 11.8. Создание ссылок на методы * 11.9. Конструирование записей * 11.10. Чтение и сохранение записей в текстовых файлах. * 11.11. Вывод структур данных  ...

Last updated 2010-06-01 12:20:10

./perl/posts/pb16

 Управление процессами и межпроцессные взаимодействия Введение Многие из нас относятся к Perl по-своему, но большинство считает его чем-то вроде "клея", объединяющего разнородные компоненты. Эта глава посвящена командам и отдельным процессам - их созданию, взаимодействию и завершению. Итак, речь пойдет о системном программировании. В области системного программирования на Perl, как обычно, все простое упрощается, а все сложное становится доступным. Если вы хотите рабо ...

Last updated 2010-06-01 10:57:58

./perl/posts/my_perl_tips

 Perl tips # Замена в файле perl -p -i -e "s/load([s]+)15([s]+)30/load	 20 30/g;s/load5([s]+)10([s]+)25/load5	 15 20/g;s/load15([s]+)10([s]+)20/load15	 10 15/g;" /usr/local/etc/hqdaemon.conf # decode Mime::Base64 perl -e use MIME::Base64; print decode_base64( $ARGV )."
";  $(ldapsearch -H ldaps://ldap.server.ru -D uid= ,ou=users,o=vega -b uid=puppet_svn,ou=virtual,ou=users,o=vega -w | grep userPassword | awk {p ...

Last updated 2010-04-27 14:50:26

./perl/posts/mail

 Как сделать аутентификацию на Perl, а не средствами веб-сервера? Для того, чтобы браузер выдал запрос логина и пароля, скрипт должен выдать следующие заголовки: print "WWW-Authenticate: Basic realm="что то там"
"; print "Status: 401 Unauthorized

"; print "Ошибка авторизации!
"; При этом "что то там" - это имя области авторизации, по правилам для области с одним именем должен всегда срабарывать один и тот же пароль. Проблема заключается в том, что ответ пользователя ...

Last updated 2010-03-05 14:16:31

./perl/posts/tips2

 Задача Имеется массив строк @Array[$k]; Нужно в этом массиве убрать все дублирующиеся строки (чтобы остался только один экземпляр). Возможно-ли в этом случае обойтись без полного перебора? Может как-то с использованием регулярных выражений или еще как-нибудь....? #!/usr/bin/perl -w use strict; &main(); sub main { my $aref = [qw/1 2 3 4 5 6 7 8 9 1 2 3 4 5/]; my $seen = {}; my $uniq = []; foreach (@$aref) { push @$uniq, $_ unless $seen->{$_}++; } print join (" ", @$uniq)."
"; } ...

Last updated 2010-03-05 14:16:31

./perl/posts/files

 Работа с файлами и директориями в Perl open - открытие файла close - закрытие файла print - вывод в файл write - запись в файл binmode - установка двоичного режима read - чтение входных данных readline - считывание строки ввода getc - считывание одиночного символа seek - поиск заданной позиции в файле tell - текущая позиция в файле stat - информация о файле select - выбор дескриптора файла для STDOUT eof - проверка конца файла flock - блокировка файла chmod - изменение прав доступа к ф ...

Last updated 2010-03-05 14:16:31

./perl/posts/perl_links

 Ссылки и многомерные структуры в Perl, или просто о не очень сложном Как известно, массивы и хэши в Perl могут хранить лишь скаляры, но не могут - более сложные объекты (в отличие от PHP). Это, конечно же, не значит, что мы не в состоянии создавать многомерные массивы и хэши (хотя в ранних версиях Perl так и было). Просто делается это по-особому - посредством механизма ссылок. Ссылка в Perl - это скаляр, который содержит адрес некоторого объекта, как-то: массив, хэш или другой скаляр. ...

Last updated 2010-03-05 14:16:31

./perl/posts/arrays

 Хэши, массивы и списки в Perl, или уже чуть посложнее Лирическое отступление Неужели все так плохо?.. Не совсем - точнее, не со всех сторон. Ну, то есть, ко всему можно привыкнуть, но со временем. Именно поэтому работа с хэшами и массивами Perl для новичка неизменно кажется чем-то непонятным, и именно из-за хэшей и массивов иногда даже хорошие программисты, начав изучать Perl, с проклятьями бросают дело на середине и берутся, например, за Java (хотя хрен редьки не слаще, если разобрат ...

Last updated 2010-03-05 14:16:31

./perl/posts/perl_tips

 PERL - Полезные советы Иногда бывает необходимо преобразовать массив чего-либо в хэш-массив. Это можно сделать так: %hash = map { $_, 1 } @array; Например: %hash = map { $_, 1 } qw(a b c); Этот оператор преобразует массив (a, b, c) в хэш-массив (a, 1, b, 1, c, 1). Предположим, мы имеем http log примерно следующего содержания gwa.fr.bosch.de - - [08/Jan/1998:01:50:42 -0700] "GET /ack.html HTTP/1.0" 200 6798  ...

Last updated 2010-03-05 14:16:31

./perl/posts/contents

 Perl.Библиотека программиста содержание Полный список разделов и глав Содержание Предисловие Введение Благодарности Глава 1. Строки 1.1. Работа с подстроками 1.2. Выбор значения по умолчанию 1.3. Перестановка значений без использования временных переменных 1.4. Преобразование между символами и ASCII-кодами 1.5. Посимвольная обработка строк 1.6. Обратная перестановка слов или символов 1.7. Расширение и сжатие символов табуляции 1.8. Расширение переменных во вхо ...

Last updated 2010-03-05 14:16:31

./perl/posts/perl_sort

 Сортировка в perl Попробуем отсортировать по возрастанию числа от 1 до 10. sort 1..10 дает нам результ (1, 10, 2, 3, 4, 5, 6, 7, 8, 9). Немного не то... Сортировка сработала как расстановка по алфавиту. Проблему можно решить с помощью оператора . @sorted_num = sort { $a $b } 1..10; # То, что мы ожидали # другой вариант этого же кода sub numerically { $a $b } @sorted_num = sort numerically 1..10; По  ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb8

 Глава 8 Содержимое файлов * введение * 8.1.Чтение строк с символами продолжения * 8.2.Подсчет строк (абзацев, записей) в файле * 8.3.Обработка каждого слова в файле * 8.4.Чтение файла по строкам или абзацам в обратном направлении * 8.5.Чтение из дополняемого файла * 8.6.Выбор случайной строки из файла * 8.7.Случайная перестановка строк * 8.8.Чтение строки с конкретным номером * 8.9.Обработка текстовых полей переменной длины * 8.10Удаление по ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb7

 Глава 7. Доступ к файлам введение 7.1. Открытие файла 7.2. Открытие файлов с нестандартными именами 7.3. Тильды в именах файлов 7.4. Имена файлов в сообщениях об ошибках 7.5. Создание временных файлов 7.6. Хранение данных в тексте программы 7.7. Создание фильтра 7.8. Непосредственная модификация файла с применением временной копии 7.9. Непосредственная модификация файла с помощью параметра -i 7.10. Непосредственная модификация файла без применения временного файла 7.11. Б ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb6

 Глава 6 Поиск по шаблону. Регулярные выражения введение 6.1. Копирование с подстановкой 6.2. Идентификация алфавитных символов 6.3. Поиск слов 6.4. Комментирование регулярных выражений 6.5. Поиск N-го совпадения 6.6. Межстрочный поиск 6.7. Чтение записей с разделением по шаблону 6.8. Извлечение строк из определенного интервала 6.9. Работа с универсальными символами командных интерпретаторов 6.10. Ускорение интерполированного поиска 6.11. Проверка правильности шаблона 6.12 ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb5

 Глава 5. Хэши введение 5.1. Занесение элемента в хэш 5.2. Проверка наличия ключа в хэше 5.3. Удаление из хэша 5.4. Перебор хэша 5.5. Вывод содержимого хэша 5.6. Перебор элементов хэша в порядке вставки 5.7. Хэши с несколькими ассоциированными значениям 5.8. Инвертирование хэша 5.9. Сортировка хэша 5.10. Объединение хэшей 5.11. Поиск общих или различающихся ключей в двух хэшах 5.12. Хэширование ссылок 5.13. Предварительное выделение памяти для хэша 5.14. Поиск самых расп ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb4

 Глава 4. Массивы введение 4.1. Определение списка в программе 4.2. Вывод списков с запятыми 4.3. Изменение размера массива 4.4. Выполнение операции с каждым элементом списка 4.5. Перебор массива по ссылке 4.6. Выборка уникальных элементов из списка 4.7. Поиск элементов одного массива, отсутствующих в другом массиве 4.8. Вычисление объединения, пересечения и разности уникальных списков 4.9. Присоединение массива 4.10. Обращение массива 4.11. Обработка нескольких элементов ма ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb3

 Глава 3 Дата и время введение 3.1. Определение текущей даты 3.2. Преобразование полного времени в секунды с начала эпохи 3.3. Преобразование секунд с начала эпохи в полное время 3.4. Операции сложения и вычитания для дат 3.5. Вычисление разности между датами 3.6. Определение номера недели или дня недели/месяца/года 3.7. Анализ даты и времени в строках 3.8. Вывод даты 3.9. Таймеры высокого разрешения 3.10. Короткие задержки 3.11. Программа: hopdelta содержание Глава 3  ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb2

 Глава 2.Числа введение 2.1. Проверка строк на соответствие числам 2.2. Сравнение чисел с плавающей запятой 2.3. Округление чисел с плавающей запятой 2.4. Преобразования между двоичной и десятичной системами cчисления 2.5. Действия с последовательностями целых чисел 2.6. Работа с числами в римской записи 2.7. Генератор случайных чисел 2.8. Раскрутка генератора случайных чисел 2.9. Повышение фактора случайности 2.10. Генерация случайных чисел с неравномерным распределением 2. ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb1

 Строки.Введение Многие языки программирования заставляют нас мыслить на неудобном низком уровне. Вам понадобилась строка, а язык хочет, чтобы вы работали с указателем или байтовым массивом. Впрочем, не отчаивайтесь - Perl не относится к языкам низкого уровня, и в нем удобно работать со строками. Perl проектировался для обработки текста, В сущности, в Perl существует такое количество текстовых операций, что их невозможно описать в одной главе. Рецепты обработки, текста встречаются и в д ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb9

 Глава 9 Каталоги * введение * 9.1.Получение и установка атрибутов времени * 9.2.Удаление файла * 9.3.Копирование или перемещение файла * 9.4. Распознавание двух имен одного файла * 9.5. Обработка всех файлов каталога * 9.6. Получение списка файлов по шаблону * 9.7. Рекурсивная обработка всех файлов каталога * 9.8. Удаление каталога вместе с содержимым * 9.9. Переименование файлов * 9.10. Деление имени файла на компоненты * 9.11. Программа ...

Last updated 2010-03-05 14:16:31

./perl/posts/pb10

 Подпрограммы *Введение* Практика вставки/копирования кода довольно опасна, поэтому в больших программах многократно используемые фрагменты кода часто оформляются в виде подпрограмм. Для нас термины "подпрограмма" (subroutine) и "функция" (function) будут эквивалентными, поскольку в Perl они различаются ничуть не больше, чем в С. Даже объектно-ориентированные методы представляют собой обычные подпрограммы со специальным синтаксисом вызова, описанным в главе 13 "К ...

Last updated 2010-03-05 14:16:31