Web - кодинг: Perl:
Введение в Perl. Встроенные функции.
Источник:
E-mail: info@citforum.ru
Автор: Маслов Владимир Викторович
Встроенные функции.
Встроенные функции используются как термы выражений и подразделяются
на две категории: списковые операторы и унарные операторы.
Это влияет на их приоритет по отношению к оператору ',' - запятая.
Списковые операторы могут иметь множество (список) аргументов,
а унарные только один. Таким образом, запятая завершает аргументы
унарного оператора и разделяет аргументы спискового.
Аргумент унарного оператора воспринимается обычно в скалярном контексте,
а спискового как в скалярном, так и списковом, причем скалярные аргументы
идут первыми. В дальнейшем списковые аргументы мы будем обозначать
словом 'LIST', это значит, что функция имеет список аргументов, разделенных
запятой. Аргументы функций можно заключать в круглые скобки и таким
образом обозначать, что "это функция" и приоритет не имеет значения,
иначе это списковый или унарный оператор с определенным фиксированным
приоритетом. Пробел после имени функции и скобкой значения не имеет.
Поэтому будьте внимательны!
Пример:
print 1 + 2 + 3; # результат 6
print(1+2)+3; # результат 3
print (1+2)+3; # опять 3
print (1+2+3); # 6
Если функция возвращает результат как в скалярном так и в списковом контексте, то код выхода по ошибке - скаляр c неопределенным значением или пустой
список.
Запомните правило:
Не существует общего правила преобразования списка в скаляр!
Каждый оператор и функция имеют свой вид значения в скалярном контексте.
Для одних это количество элементов из скалярного контекста. Для других - первый элемент списка или последний или количество успешных операций. Каждый - свое, если вы специально не указываете.
Оператор '-X',
abs,
accept,
alarm,
atan2 Y, X,
bind,
binmode,
bless,
caller,
chdir,
chmod,
chomp,
chop,
chown,
chr,
chroot,
close,
closedir,
connect,
cos,
crypt,
dbmclose,
dbmopen,
define,
delete,
die,
do BLOCK,
do подпрограмма,
do выражение,
dump,
each,
eof,
eval,
exec,
exists,
exit,
exp,
fcntl,
fileno,
flock,
fock,
format,
formline,
getc,
getlogin,
getpeername,
getpgrp PID,
getppid,
getpriority,
Группа системных вызовов,
getsockname,
getsockopt,
glob,
gmtime,
goto,
grep,
hex,
import,
index,
int,
ioctl,
join,
keys,
kill,
last,
lc,
lcfirst,
length,
link,
listen,
local,
localtime,
log,
lstat,
m//,
map,
mkdir,
msgctl,
msgget,
msgsnd,
msgrcv,
my,
next,
no Module,
oct,
open,
opendir,
ord,
pack,
pipe,
pop,
pos,
print,
printf,
push,
q/строка/, qq/строка/, qx/строка/, qw/строка/,
quotemeta,
rand,
read,
readdir,
readlink,
recv,
redo,
ref,
rename,
require,
reset,
return,
reverse,
rewindir,
rindex,
rmdir,
s///,
scalar,
seek,
seekdir,
select,
select RBITS, WBITS, EBITS, TIMEOUT,
semctl,
semget,
semop,
send,
setpgrp,
setpriority,
setsockopt,
shift,
shmget,
shmget,
shmread,
shutdown,
sin,
sleep,
soket,
soketpair,
sort,
splice,
split,
sprintf,
sqrt,
srand,
stat,
study,
substr,
symlink,
syscall,
sysread,
system,
syswrite,
tell,
telldir,
tie,
time,
times,
tr///,
truncate,
uc,
ucfirst,
umask,
undef,
unlink,
unpack,
untie,
unshift,
use,
utime,
values,
vec,
wait,
waitpid,
wantarray,
warn,
write,
y///
Оператор '-X'.
-X указатель файла
-X выражение
-X
Проверка файла, где 'X' - одно из ниже описанных значений.
Это унарный оператор с одним аргументом - либо именем файла, либо
указателем файла. Проверяет одно из условий. Если аргумент не указан,
то берется значение переменной $_. Для ключа -t - STDIN.
Результат 1, если true, '', если false или неопределенное значение,
если файл не найден. Несмотря на странный вид это унарный оператор
с соответствующим приоритетом. Аргумент можно заключать в круглые скобки.
'X' имеет следующие значения:
-r | Файл разрешен на чтение эффективным uid/gid |
-w | на запись -//- |
-x | исполнение -//- |
-o | принадлежит эффективному uid (идентификатор пользователя) |
-R | Файл разрешен на чтение реальным uid/gid |
-W | на запись -//- |
-X | исполнение -//- |
-O | принадлежит реальному uid |
-e | файл существует |
-z | пустой |
-s | не пустой |
-f | обычный текст |
-d | директория |
-l | символическая ссылка |
-p | pipes (конвейер) |
-S | socket (гнездо) |
-b | специальное блочное устройство |
-c | -//- символьное -//- |
-t | указатель на уст-во tty |
-u | установлен бит setuid |
-g | -//- setgid |
-k | -//- sticky |
-T | текстовой файл |
-B | двоичный |
-M | "возраст" файла в днях на момент старта скрипта |
-A | дней с последнего чтения |
-C | дней с последней модификации inode |
abs выражение
Абсолютное значение выражения
accept NEWSOCKET, GENERICSOCKET
Открыть новый сокет по внешнему запросу. Аналогично
системному вызову accept(). Возвращает адрес или false в случае
неудачи.
alarm секунды
Послать сигнал SIGALARM текущему процессу
по истечении указанного промежутка времени. Не допустимо делать
несколько вызовов одновременно в одном промежутке времени.
Возвращает остаток времени предыдущего счетчика.
atan2 Y, X
Арктангенс отношения Y к X в пределах от -pi до +pi.
bind сокет, имя
Назначить сетевой адрес сокету. Подобно системному
вызову bind. Возвращает true в случае успеха и false иначе.
Имя - пакетный адрес сокета.
binmode файл
Открыть файл для двоичного (binary) режима доступа.
В обычном режиме при вводе символы CR LF транслируются в LF,
а при выводе LF транслируется в CR LF.
bless ссылка, класс
bless ссылка
Данная функция определяет что объект указанный ссылкой
принадлежит классу. Если класс не указан то он относится к текущему
классу. Обычно это последний оператор в конструкторе объекта.
Необходимо обязательно указывать имя класса если определяемый
объект может наследоваться классом-потомком.
caller выражение
caller
Возвращает контекст вызова текущей подпрограммы.
В скалярном контексте true если это подпрограмма или процедура
вызванная операторами eval() или require() и false - иначе.
В списковом это список ($package, $filename, $line),
где
- $package - имя пакета
- $filename - имя файла пакета
- $line - номер строки откуда был сделан вызов.
Если указано выражение то возвращается список:
($package, $filename, $line, $subroutine, $hasargs, $wantargs)
Выражение определяет "глубину" вложенности просмотра стека вызовов.
- $subroutine - имя подпрограммы
- $hasargs - имеющиеся аргументы
- $wantargs - необходимые аргументы
Применение данной функции в DB пакете возвращает более детальную
информацию. К списку аргументов добавляется список @DB::args.
chdir выражение
Перейти в директорию указанную выражением. Если
выражение отсутствует то перейти в "домашнюю" директорию.
Возвращает true в случае успеха и false - неудачи.
chmod список
Изменить права доступа к файлам указанным в списке.
Первый элемент в списке - числовое ,обычно восьмеричное значение прав.
Возвращает количество файлов которым были изменены права.
Пример:
chmod 0666 'f1', 'f2', 'f3';
chomp переменная
chomp список
chomp
Удаляет в конце строки символ указанный переменной $/.
Обычно это 'LF'. Возвращает количество удаленных символов.
Если переменная не указана то используется переменная $_.
Если указан список то обрабатывается каждая строка списка и
возвращается общее количество удаленных символов.
chop переменная
chop список
chop
Полностью аналогично функции chomp но всегда удаляет
последний символ строки.
chown список
Изменить "владельца" и "группу" файлов списка.
Первый элемент - номер нового владельца, второй номер новой группы
а далее список файлов.
В большинстве Unix-систем вы не сможете сменить владельца если вы
не суперпользователь, но можете изменить группу если это одна из
ваших "вторичных" групп.
chr число
Возвращает символ с указанным кодом кодировки.
chroot директория
Сделать "корневой" указанную директорию.
"Корневая" - значит внутри программы на нее можно ссылаться как '/'.
close файл
Закрыть открытый файл или поток. Можно не использовать,
если один и тот же файл открывается повторно, т.к. он будет
автоматически закрываться новым вызовом open().
closedir директория
Закрыть директорию, открытую функцией opendir().
connect сокет, имя
Связаться с удаленным сокетом. Данная функция подобна
системному вызову connect(). Возвращает true в случае успеха
и false при ошибке.
cos выражение
Косинус выражения в радианах.
crypt текст, salt
Шифрация текста. Аналогично системному crypt().
dbmclose хеш
Закрывает связь между хеш и базой данных.
dbmopen хеш, база, режим
Ассоциировать указанный хеш и базу в определенном режиме.
Дело в том, что в Perl реализован очень удобный механизм работы
с базами данных типа dbm, ndbm, sbdm, gdbm и Berkeley DB. Для этого нужно
связать (открыть) базу под именем хеша. Вся работа с записями
базы выполняется так, будто это обычный хеш (ассоциативный массив).
Более подробно смотрите описание функции AnyDBM().
define выражение
Возвращает true, если значение определено (существует)
и false, если нет. Многие операции завершаются неопределенным
значением, например чтение после конца файла, использование
неопределенных переменных, системные ошибки и т.д.
Данная функция позволяет различать нулевое и неопределенные
значения, определенность или неопределенность функций или
ссылок. При использовании определенности ключа в хеше
она возвращает определен данный ключ или нет, но не существует
он или нет.
delete выражение
Удалить значение из хеша. Возвращает удаляемое значение
или неопределенность, если ничего не удаляется.
Удаление из массива окружения $ENV{} - изменяет окружение.
Удаление из хеша связанного с базой данных - удаляет запись в
базе данных.
die список
Если программа не была запущена из eval(), данная
функция выводит список в поток STDERR и завершает работу
программы с кодом из переменной $!. Если $! содержит 0,
то с кодом ($? >> 8). Если и это 0, то с кодом 255.
При вызове из eval() сообщение об ошибке заносится в переменную $@,
и eval() завершается с неопределенным значением. Это позволяет
отрабатывать ошибочные ситуации, не завершая головной модуль.
Если строка из списка не завершается символом '\n', то дополнительно
печатается номер строки скрипта, откуда вызвана функция и номер
входной строки, если таковой имеется.
do BLOCK
Это не совсем функция. Здесь возвращается значение
последнего оператора блока. Когда используется циклический модификатор
BLOCK исполняется перед проверкой условия цикла в отличии от обычных
циклов.
do подпрограмма
Устаревший метод вызова подпрограмм.
do выражение
Значение выражения воспринимается как имя файла Perl скрипта.
Изначально это применялось для включения подпрограмм библиотеки.
Сейчас правильней использовать вызовы use() и require(), которые
обеспечивают контроль ошибок и завершения.
dump метка
Выполнение "дампа" текущей памяти. Применялось для
возможности использовать программу undump, чтобы включить текущий
исполняемый код в программу после инициализации всех переменных.
Выполнение этой новой программы будет начинаться оператором
goto метка. Если метка опущена, то запуск сначала.
Внимание! Файлы, открытые до момента дампа, не будут открытыми
в момент исполнения новой программой.
each хеш
Возвращает 2-элементный массив. Первый элемент - ключ
второй - значение следующего элемента хеша. Позволяет
"просматривать" все значения хеша в определенном порядке.
Сброс переменной цикла происходит только после прохождения всего
массива.
eof файл
eof()
eof
Возвращает 1, если выполняется чтение после конца или
чтение из не открытого файла. Аргументом должно быть выражение,
возвращающее существующий указатель файла. Данную функцию нельзя
использовать для чтения файлов, открытых как терминалы.
Если аргумент не указан, то используется последний читаемый файл.
Использование в форме eof() целесообразно применять в циклах
while(<>) для определения конца только последнего файла из
списка. Применяйте eof(ARGV) или eof для определения конца
каждого файла из списка.
eval выражение
eval блок
Выражение сканируется и выполняется как обычная Perl программа.
Это делается в контексте текущей программы, поэтому можно использовать
уже определенные переменные и подпрограммы.
Возвращается результат последнего оператора в блоке или значение
оператора return. Если обнаружится синтаксическая ошибка или выполнится
оператор die, то возвращается неопределенное значение, а переменная $@
содержит сообщение об ошибке. Если ошибки не было, то $@ содержит
нулевую строку. При отсутствии аргумента берется значение переменной $_.
exec список
Выполняется системная команда из списка, и выполнение
программы завершается. Если вам необходимо вернуться, то лучше
применяйте функцию system(). Если в списке количество аргументов
больше 1 или список - это массив с количеством элементов больше 1,
то выполняется системный вызов execvp() с аргументами из списка.
Если один скалярный аргумент, то он сканируется на обработку
метасимволов, и если они присутствуют, то полученные аргументы
передаются интерпретатору /bin/sh -c для дальнейшей обработки.
Если метасимволов нет, то аргумент расщепляется на слова и передается
системному вызову execvp(), что более эффективно.
Внимание! exec() и system(0) не сбрасывают буфер ввода/вывода,
поэтому необходимо установить переменную $| для предотвращения
потери выходной информации.
exists выражение
Возвращает true, если существует указанный ключ хеша,
даже если не определено его значение.
exit выражение
Выполнение программы завершается с кодом выражения.
exp выражение
Возвращает e (основание натурального логарифма) в степени
выражения.
fcntl файл, функция, скаляр
Выполняет системный вызов fcntl(). Для использования
обязательно выполнить use Fcntl;
fileno файл
Возвращает описатель файла для данного указателя файла.
flock файл, операция
Системный вызов flock()
fock
Системный вызов fock(). Возвращает pid потомка для родителя
и 0 - для потомка в случае успеха, иначе - неопределенное значение.
format
Декларативная функция Perl. Определяет формат вывода для
оператора write. Подробно смотрите главу Форматы.
formline формат, список
Внутренняя функция, используемая в format. Форматирует
вывод параметров из списка. Результат помещается в переменную $^A
Функция write просто выводит значение этой переменной, но ее так же
можно читать, а затем обнулять. Обычно format выполняет один вызов
formline для одной строки формы, но formline не разделяет строки
формата. Это значит что символы '~' и '~~' рассматривают весь
формат как одну строку, поэтому необходимо использовать многострочные
формы для описания одной записи формата.
getc файл
getc
Читает и возвращает символ из указанного файла.
Если файл не указан, то читается STDIN. После конца файла возвращает
пустую строку.
getlogin
Возвращает текущий login из файла /etc/utmp
Не применяйте для идентификации пользователя, он не так сильно
"закрыт" как getpwuid().
getpeername сокет
Возвращает упакованный адрес удаленного сокета.
getpgrp PID
Возвращает группу процесса с указанным PID. Если
аргумент отсутствует, возвращает группу текущего процесса.
getppid
Возвращает PID родительского процесса.
getpriority WHICH, WHO
Возвращает текущий приоритет процесса, группы процессов
или пользователя.
Группа системных вызовов:
- getpwnam NAME
- getgrnam NAME
- gethostbyname NAME
- getnamebyname NAME
- getprotobyname NAME
- getpwuid UID
- getgrid GID
- getservbyname NAME, PROTO
- gethostbyaddr ADDR, ADDRTYPE
- getnetbyaddr ADDR, ADDRTYPE
- getprotobynumber NUMBER
- getservbyport PORT, PROTO
- getpwent
- gethostent
- getnetent
- getprotoent
- getservent
- setpwent
- setgrent
- sethostent STAYOPEN
- setnetent STAYOPEN
- setprotoent STAYOPEN
- setservent STAYOPEN
- endpwent
- endgrent
- endhostent
- endnetent
- endprotoent
- endservent
Все эти функции аналогичны одноименным системным вызовам.
В списковом контексте возвращают следующие списки:
($name, $passwd, $uid, $gid, $quota, $comment, $gcos, $dir, $shell) = getpw*
($name, $passwd, $gid, $members) = getgr*
($name, $aliases, $addrtype, $length, @addrs) = gethost*
($name, $aliases, $addrtype, $net) = getnet*
($name, $aliases, $proto) = getproto*
($name, $aliases, $port, $proto) = getserv*
В скалярном контексте возвращается имя или что-то другое, в зависимости
от типа функции.
Элемент $members в вызове getgr содержит разделенные пробелом имена
членов группы.
@addrs содержит IP адреса компьютеров в сети Интернет в упакованном виде.
Для распаковки применяйте: ($a, $b, $c, $d) = unpack('C4',$addr[0]);
getsockname сокет
Возвращает упакованный адрес сокета локальной машины.
getsockopt сокет, уровень, опция
Возвращает опцию сокета.
glob выражение
Возвращает список файлов, удовлетворяющих выражению с '*',
как в команде ls.
gmtime выражение
Переводит местное время, полученное функцией time(), во время
по Гринвичу.
Обычно используется в виде:
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=gmtime(time);
goto метка
goto выражение
goto &подпрограмма
Безусловный переход на метку. Нельзя делать переход на
метку в структуру, которая должна быть инициирована, например, подпрограмму
или цикл foreach и т.д.
Вторая форма применяется для динамического определения перехода.
Например:
goto ('метка1', 'метка2', 'метка3')[$i];
Здесь при $i = 0 будет переход на 'метка1', $i = 1 на 'метка2' и т.д.
Третья форма (goto &подпрограмма) довольно "хитрый" метод подмены
имени вызываемой подпрограммы именем текущей. Это используется
в методе автозагрузки, когда нужно запустить другую процедуру,
но под именем текущей, как будто та была вызвана раньше.
grep блок, список
grep выражение, список
Выполнят блок или выражение для каждого элемента списка.
Переменная $_ содержит текущий элемент.
Возвращает список элементов, с которыми выражение дало результат true.
В скалярном контексте возвращает количество результатов true.
hex выражение
Воспринимает выражение как строку шестнадцатеричных цифр
и возвращает десятичное значение.
import
В Perl нет встроенной функции import, но есть метод,
с помощью которого модули могут экспортировать область имен
другим модулям. Подробно смотрите функцию use().
index строка, подстрока, позиция
index строка, подстрока
Возвращает позицию первого вхождения подстроки в строке,
начиная с указанной позиции. Если позиция отсутствует, то сравнение
начинается с начала строки. Отсчет позиции ведется с 0, если только
не изменено значение встроенной переменной $[. Если подстрока не
найдена, то результат меньше первой позиции на 1. Обычно это -1.
int выражение
Возвращает целую часть выражения.
ioctl FILEHANDLE, FUNCTION, SCALAR
Выполняет системный вызов ioctl(). В начале программы
необходимо указать: require "ioctl.ph";
join выражение, список
Соединяет строки списка или массива в одну строку
с кодом разделителя, равному выражению.
keys хеш
Возвращает массив всех ключей хеша. В скалярном
контексте - количество ключей. Порядок следования ключей
аналогичен порядку в each функции.
kill список
Послать сигнал (первый элемент) указанным в списке
процессам. Возвращает количество процессов которые сигнал приняли.
last метка
last
Функция аналогичная break в С. Прерывает цикл и переходит
на указанную метку. Если метки нет на ближайший внешний цикл.
Блок continue не выполняется.
lc выражение
Преобразовать строку в буквы нижнего регистра.
lcfirst выражение
Заменить первую букву строки на малую.
length выражение
Возвращает длину строки выражения.
link OLDFILE, NEWFILE
Создать файл NEWFILE связанный с файлом OLDFILE.
listen SOCKET, QUEUESIZE
Выполнить системный listen().
local список
Объявляет перечисленные переменные как локальные в текущем
блоке или подпрограмме. Если указано два и более имени, их
необходимо заключить в круглые скобки. Предпочтительней использовать
функцию my().
localtime выражение
Преобразовать 9-элементный массив, возвращаемый функцией
time, относительно местного времени. Употребляется как:
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst)=localtime(time);
log выражение
Возвращает натуральный логарифм выражения.
lstat файл
lstat выражение
То же что и системный вызов stat(), но касательно ссылки
на файл, а не самого файла.
m//
Оператор совпадения. Смотри главу Операторы
map блок, список
map выражение, список
Выполняет блок или выражение для каждого элемента списка.
Возвращает список результатов.
mkdir директория, права
Создать директорию с указанными правами доступа. Возвращает
1 при успехе, и 0 при неудаче.
msgctl ID, CMD, ARG
Системный вызов msgctl() System V
msgget KEY, FLAGS
Системный вызов msgget() System V
msgsnd ID, MSG, FLAGS
Системный вызов msgsnd() System V
msgrcv ID, VAR, SIZE, TYPE, FLAGS
Системный вызов msgrcv() System V
my список
Объявляет локальными переменные в списке.
Если два или более имени, их необходимо заключить в круглые скобки.
next метка
next
Аналогичен continue в С. Переход к следующей итерации в цикле.
Если в цикле присутствует блок continue, он так же выполняется.
Если метка отсутствует - переход на ближайший внутренний цикл.
no Module список.
Исключить использование указанных модулей.
oct выражение
Возвращает десятичное число, представленное восьмеричными цифрами.
open файл, выражение
open файл
Открыть файл с указанным именем. Аргумент "файл" - это
фактически указатель на блок описания файла. Если имя (выражение)
файла отсутствует, то имя считается таким же как и указатель файла.
Если перед именем стоит символ '<' то файл открывается только
на чтение (значение по умолчанию). Если '>' - на запись.
Если '>>' - на добавление записей. '+>' или '+<' - файл открыт
на чтение и запись одновременно.
Если имя файла начинается с символа '|', то имя считается системной
командой, на вход которой выводятся данные (поток).
Имя '-' - стандартный вход (STDIN), '>-' - стандартный вывод (STDOUT).
Функция возвращает true при успехе и false - неудаче.
Если имя (выражение) начинается с символов ">&", то остаток
имени считается именем указателя файла, который открывается повторно.
Символ '&' может стоять после '<', '>>', '+>', '+>>' и '+<'.
Режим повторного открытия должен соответствовать первому.
Выражение вида "<&=N" где N -число, эквивалентно системному вызову
fdopen().
Если имя "|-" или "-|", то происходит "расщепление" (fork) процесса
на потомка и родителя. При этом возвращается номер процесса потомка
(PID) внутри родительского процесса и 0 - внутри потомка. При этом
запись/чтение в файл родительским процессом воспринимается как
чтение/запись потомком. Для потомка это стандартный ввод/вывод.
Родительский процесс ждет завершения потомка после закрытия потока
и получает код завершения в переменной $?.
Имя файла не должно содержать пробелов как в начале, так и в конце.
opendir указатель, выражение
Открыть директорию с именем выражения для обработки
функциями readdir(), telldir(), seekdir(), rewinddir() и closedir().
Возвращает true при успехе.
ord выражение
Возвращает ascii код первого символа выражения.
pack шаблон, список
Упаковывает список в двоичную структуру по шаблону.
Шаблон - это строка символов, описывающая порядок и тип упакованных
значений.
- A - текстовая строка, добавляется пробелами.
- a - текстовая строка, добавляется 0 символом.
- b - битовая строка (возрастающая нумерация бит)
- B - битовая строка (убывающая нумерация бит)
- h - шестнадцатеричная строка ( младший байт - первый)
- H - шестнадцатеричная строка (старший байт первый)
- c - символ со знаком
- C - символ без знака.
- s - короткое целое (один байт) со знаком.
- S - короткое целое без знака.
- i - целое (два байта) со знаком.
- I - целое без знака.
- l - длинное целое (4 байта) со знаком.
- L - длинное целое без знака.
- n - короткое в "сетевом" формате.
- N - длинное в "сетевом" формате.
- v - короткое в "VAX" формате.
- V - длинное в "VAX" формате.
- f - single float.
- F - double float.
- p - указатель на строку ограниченную 0.
- P - указатель на структуру с фиксированной длиной.
- u - упаковка uuencode.
- x - нуль-байт
- X - резервный байт.
- @ - заполнить нулями позицию.
За каждой буквой может стоять число означающее количество повторов.
Для всех типов за исключением 'a', 'A', 'b', 'B', 'h' и 'H',
упаковывается максимально возможное количество значений из списка.
Символ '*' после типа означает использовать оставшиеся параметры.
Тип 'a' и 'A' использует только одно значение из списка и добавляет
остаток поля либо нуль-символами, либо пробелами (при распаковке
по типу 'A' пробелы и нули отбрасываются, а по 'a' - нет).
Типы 'b' и 'B' упаковывают строку в указанное число бит.
Так же как и 'h' и 'H' в число ниблов (байт).
'P' - упаковывает указатель на структуру с указанной длиной.
Числа с плавающей запятой (floats и double) записываются в
стандартном для каждой машины формате и могут быть разными
для разных типов машин. Заметьте, что Perl всегда использует
двойную точность (double), поэтому упаковка и распаковка по
типу 'f' приведет к потере точности.
Шаблоны для распаковки и упаковки совершенно одинаковы.
Примеры:
print(pack("ccc",65,66,67)); # Результат ABC
print(pack("A4A3","ab","cdefg")); # "ab cde"
print(pack("a4a3","ab","cdefg")); # "ab\0\0cde"
pipe READHANDLE, WRITEHANDLE
Аналогичен системному pipe().
pop массив
Удаляет и возвращает последний элемент массива.
Длина массива уменьшается на 1. Результат не определен, если массив
пустой. Если имя массива отсутствует, то извлекает из @ARGV
для головной программы и @_ для подпрограммы.
pos скаляр
Возвращает смещение от последнего m//g поиска.
print файл список
print список
print
Выводит строку или список строк в файл. Возвращает true
при успехе. Аргумент файл может быть скалярной переменной, содержащей
имя указателя файла, если он отсутствует, то осуществляется вывод
в стандартный выходной поток STDOUT (если не было вызова select()).
Если список отсутствует, то выводится значение переменной $_.
Для вывода по умолчанию в другой файл необходимо использовать
функцию select().
Так как print работает в списковом контексте, то все элементы списка
так же вычисляются в списковом контексте, т.е. функции будут возвращать
списковые значения. Аргументы можно заключать в круглые скобки.
Если указатель файла - элемент массива, то элемент нужно заключить
в фигурные скобки для вычисления блока.
printf файл список
printf список
Аналогичен вызову "print файл sprintf(список)".
Первый элемент списка должен быть форматом printf(), как и в С.
push массив, список
Добавить элементы массива значениями из списка.
Длина массива увеличивается на количество элементов списка.
q/строка/
qq/строка/
qx/строка/
qw/строка/
Обычные операторы строк. Смотри главу Операторы.
quotemeta выражение
Вычисляет выражение, в котором метасимволы рассматриваются
как обычные символы.
rand выражение
rand
Возвращает случайное число в диапазоне между 0 и выражением.
Если выражение отсутствует - между 0 и 1. Данная псевдослучайная
последовательность сбрасывается функцией srand().
read файл, скаляр, длина, смещение
read файл, скаляр, длина
Прочитать указанное число байт из файла в скалярную переменную.
Возвращает количество прочитанных байт или неопределенность при
ошибке. Длина скаляра станет равной количеству считанных байт. Смещение
указывают, если данные нужно поместить не с самого начала строки.
readdir директория
Возвращает имя следующего файла в директории открытой командой
opendir(). В скалярном контексте возвращает все оставшиеся имена
файлов. Если файлов больше нет, то возвращает неопределенность в
скалярном контексте и пустую строку в списковом.
readlink выражение
Возвращает значение символической ссылки. При ошибке
возвращает неопределенное значение.
recv SOCKIT, SCALAR, LEN, FLAGS
Получить сообщение из сокета. Аналогичен системному recvfrom().
redo метка
redo
Перейти к началу блока, минуя вычисление условия и блока
continue. Если метка отсутствует, то переход к ближайшему внешнему
блоку.
ref выражение
Возвращает true, если выражение это ссылка, иначе - false.
Возвращаемое значение зависит от типа ссылки. Существуют
следующие типы ссылок:
REF, SCALAR, ARRAY, HASH, CODE, GLOB
Если аргумент - ссылка на класс, то возвращается имя класса.
Функция ref() аналогична функции typeof().
rename старое_имя, новое_имя_файла
Переименовать файл. Возвращает 1 в случае успеха, иначе - 0.
105require выражение
require
Если выражение - число, требует что бы текущая версия
Perl была не ниже указанной. Если строка - считывает библиотечный файл
с указанным именем, если он еще не прочитан.
Последний оператор библиотечного файла должен возвращать true.
Обычно это строка вида 1;
Если расширение имени файла отсутствует, то по умолчанию принимается ".pm"
В данной функции можно указывать путь расположения файла, а если
библиотека расположена в стандартной системной области Perl, то вместо
require предпочтительней использовать use().
reset выражение
reset
Обычно используется в блоках continue циклов для
очистки переменных и поиска для повторного применения.
Выражение воспринимается как список символов. Для указания
диапазона можно применять символ минус '-'.
Все переменные и массивы, начинающиеся с этих символов,
обнуляются. Если выражение отсутствует, то обнуляется поиск
?шаблон? для повторного поиска. Сбрасываются только
переменные текущего модуля.
Пример:
reset 'a'; # очистить все переменные начинающиеся
# буквой 'a'
reset 'a-z' # все переменные с малых букв.
Выражение вида: 'A-Z' употреблять не рекомендуется, т.к.
обнуляются важные массивы @ARGV и @ENV.
return список
Выход из подпрограммы с указанным кодом. Если данная
функция отсутствует, то выход из подпрограммы осуществляется с
кодом последнего выполненного оператора.
reverse список
В списковом контексте возвращает список с элементами
в обратном порядке указанному списку. В скалярном контексте
возвращает строку с переставленными символами первого элемента
списка.
rewindir директория
Устанавливает указатель файлов открытой директории
в начало для последующего чтения функцией readdir().
rindex строка, подстрока, позиция
rindex строка, подстрока
Подобна функции index , но возвращает позицию последнего
вхождения подстроки в строку. Если указана позиция, то просмотр
выполняется до нее.
rmdir директория
Удалить указанную директорию, если в ней нет никаких файлов.
Возвращает 1 при успехе и 0 - при неудаче. При этом переменная $!
содержит код (errno).
s///
Оператор подстановки. Смотри главу Операторы.
scalar выражение
Вычисляет выражение в скалярном контексте и возвращает
результат. В Perl нет специальной функции для принудительного
вычисления в списковом контексте, т.к. для достаточно заключить
его в круглые скобки.
seek файл, позиция, отсчет
Установить указатель на произвольную позицию в файле.
Если отсчет равен 0 - позиционировать от начала файла, если 1 - от
текущего положения, 2 - от конца файла. Возвращает 1 при успехе
и 0 - неудаче.
seekdir директория, позиция
Установить указатель файла в открытой директории для
последующего чтения функцией readdir(). Текущая позиция
может быть получена функцией telldir().
select файл
select
Возвращает текущий указатель файла- по умолчанию
или делает текущим указанный. Таким образом, если в функциях
print или write не указан файл вывода, то это осуществляется
в файл, указанный select. Переменные, связанные с выводом, так же
действуют на вывод в этот файл.
select RBITS, WBITS, EBITS, TIMEOUT
Выполняет системный select()
semctl ID, SEMNUM, CMD, ARG
Системный вызов semctl() для SYSTEM V.
semget KEY, NSEMS, FLAGS
Системный вызов semget() для SYSTEM V.
semop KEY, OPSTRING
Системный вызов semop() для SYSTEM V.
send SOCKET, MSG, FLAGS, TO
send SOCKET, MSG, FLAGS
Послать сообщение через сокет. Аналогично системному send().
setpgrp PID, PGRP
Установить номер группы PGRP процессу с номером PID, 0 - для текущего процесса.
setpriority WHICH, WHO, PRIORITY
Установить приоритет PRIORITY процессу пользователя WHO
и группе WHICH.
setsockopt SOCKET, LEVEL, OPTNAME, OPTVAL
Установить параметры сокета. Возвращает неопределенность
при ошибке.
shift массив
shift
Удаляет первый элемент массива и возвращает его значение.
Если массив пустой, то результат - неопределенность. Если аргумент
опущен - обрабатывается массив @ARGV в головной программе
или @_ в подпрограмме.
shmctl ID, CMD, ARG
Системный вызов shmctl() System V
shmget KEY, SIZE, FLAGS
Системный вызов shmget() System V
shmread ID, VAR, POS, SIZE
shmread ID, STRING, POS, SIZE
Пишет или читает сегмент общедоступной памяти в System V.
shutdown SOCKET, HOW
Прекращает работу сокета методом HOW.
sin выражение
Возвращает в радианах синус выражения.
sleep выражение
sleep
Приостанавливает работу процесса на указанное число секунд
или зацикливается, если аргумент отсутствует. Работа продолжается, если
получен сигнал SIGALARM. Возвращает время фактической паузы.
socket SOCKET, DOMAIN, TYPE, PROTOCOL
Открывает сокет и привязывает его к указателю SOCKET.
socketpair SOCKET1, SOCKET2, DOMAIN, TYPE, PROTOCOL
Создает "безымянную" пару сокетов в указанном DOMAIN.
Возвращает true при успехе и false - неудаче.
sort подпрограмма список
sort блок список
sort список
Сортирует элементы списка и возвращает полученный список.
Несуществующие элементы списка отбрасываются. Если не указано
имя подпрограммы или блок, то сортирует в стандартном строковом
порядке.
Указанная подпрограмма возвращает значения больше, меньше или
равное нулю в зависимости от двух соседних элементов списка.
Имя подпрограммы может быть указано переменной. Она не должна
быть рекурсивной, и два сравниваемых элемента списка передаются
как глобальные переменные $main::a и $main::b. Это ссылки, поэтому
их изменение приводит к изменению самих элементов списка.
splice массив, смещение, длина, список
splice массив, смещение, длина
splice массив, смещение
Удаляет элементы массива, начиная со смещения и указанной длины.
Заменяет их указанным списком. Возвращает удаленный список.
Если длина не указана, удаляет все элементы списка, начиная со смещения.
split /шаблон/, выражение, предел
split /шаблон/, выражение
split /шаблон/
split
Разделяет строку, указанную выражением, на массив элементов и возвращает его.
В скалярном контексте возвращает количество полученных элементов массива,
а сам массив помещает в @_ (в списковом контексте поместить результат
в @_ можно если применить ?шаблон?)
Если выражение отсутствует, то обрабатывается содержимое переменной $_.
Если шаблон отсутствует, то разделителем является пробел.
Все, что подходит по шаблону, считается разделителем. Если указан предел,
то это максимальное число разделений. Отрицательное значение предела
воспринимается как неограниченно большой предел.
Если пустая строка походит под шаблон разделителя, то исходное значение
разделяется посимвольно.
Предел удобно использовать для частичного разделения строки.
Пример:
($a, $b, $остаток) = split(/ /, "Один Два Три Четыре",3);
здесь $a = 'Один', $b = 'Два' и $остаток = 'Три Четыре'
Если шаблон содержит круглые скобки, то символы-разделители, указанные
в них, вставляются в результирующий список как обычные элементы,
причем вставляется символ, который совпал с разделителем.
Пример:
@a = split(/([,.])/, "Один,Два.Три");
здесь @a = ("Один", "," ,"Два", ".", "Три")
sprintf формат, список
Форматирует список по указанному формату аналогично
функции sprintf() языка С.
sqrt выражение
Возвращает корень квадратный выражения.
srand выражение
Задает начальное значение для генератора случайных чисел -
оператора rand. Если аргумент отсутствует, то используется текущее
машинное время.
stat файл
stat выражение
Возвращает 13 элементный массив параметров указанного файла
или пустой список при ошибке. Применяется обычно следующим образом:
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blksize,
$blocks) = stat($filename);
где
- $dev - имя устройства
- $ino - номер i-узла
- $mode - права доступа
- $nlink - количество связей
- $uid - идентификатор владельца
- $gid - идентификатор группы
- $rdev - тип устройства
- $size - размер файла в байтах
- $atime - дата последнего обращения
- $mtime - дата последней модификации
- $ctime - дата последнего изменения статуса
- $blksize - размер блока на диске
- $blocks - количество блоков в файле.
Если указан аргумент '_', то возвращается результат предыдущего
вызова stat().
study скаляр
study
Включение метода частотного сравнения. Целесообразность
применения зависит от количества поисков и количества констант в
строке в которой ведется поиск.
Функция работает следующим образом:
Для указанного скаляра (если аргумент отсутствует берется значение
переменной $_) строится список указателей на каждый символ строки.
Затем, когда начинается поиск, первыми просматриваются символы, которые
наиболее редко встречаются в английском языке.
Выигрыш по времени очевиден, когда выполняется многократный поиск
в одной и той же строке, и время затраченное на индексацию окупается.
substr выражение, смещение, длина
substr выражение, смещение
Возвращает подстроку выражения, начиная со смещения и заданной
длины. Если смещение отрицательное, то отсчет ведется от конца строки.
Если длина не указана, то берется все до конца строки.
symlink старый_файл, новый_файл
Создает новый файл, символически связанный со старым, т.е.
создает ссылку на файл. Возвращает 1 при успехе и 0 - неудаче.
syscall список
Выполняет системную функцию. Первый элемент списка - это
имя функции, а остальные элементы - ее аргументы.
Если функция не выполнима, то возвращается фатальная ошибка.
Аргументы интерпретируются следующим образом.
Если аргумент число, то оно считается целым. Если не число, то аргумент
считается указателем на строку. Вам необходимо обеспечить достаточную
длину аргумента для подстановки значения указателя. В Perl передается
максимум 14 параметров. Обычно этого достаточно.
sysread файл, скаляр, длина, смещение
sysread файл, скаляр, длина
Прочитать из файла указанное число байт в скаляр с помощью
системного вызова read(). Смещение обозначает позицию в скаляре,
после которой будут вставлены прочитанные байты.
system список
Делает то же самое, что и "exec список" с той лишь разницей,
что вызов fork() делается первым, и родительский процесс ждет
завершения потомка. Возвращает значение аналогичное функции wait().
Для получения действительного кода завершения необходимо разделить
на 256.
syswrite файл, скаляр, длина, смещение
syswrite файл, скаляр, длина
Записать в файл указанное число байт скаляра с помощью
системного вызова write(). Смещение указывает позицию в скаляре,
откуда начинается запись.
tell файл
tell
Возвращает текущую позицию указателя в открытом файле.
Если файл не указан, то последнего читаемого файла.
telldir директория
Возвращает текущую позицию указателя в открытой директории.
Обычно это параметр для позиционирования указателя директории
функцией seekdir().
tie переменная, класс, список
Присваивает переменную классу. Список - это аргументы
new метода класса (TIESCALAR, TIEARRAY или TIEHASH).
Возвращает указатель на созданный новый объект класса, который
удобен для вызова других методов класса.
Внимание! Такие функции как keys() и values() могут вернуть
в качестве значения огромное количество данных.
Для создания объекта ассоциативного типа необходимо определение
следующих методов:
- TIEHASH classname, LIST
- DESTROY this
- FETCH this, key
- STORE this, key, value
- DELETE this, key
- EXISTS this, key
- FIRSTKEY this
- NEXTKEY this, lastkey
Обычного массива:
- TIEHASH classname, LIST
- DESTROY this
- FETCH this, key
- STORE this, key, value
- [others TBD]
Скалярного типа:
- TIEHASH classname, LIST
- DESTROY this
- FETCH this, key
- STORE this, key, value
time
Возвращает количество секунд, начиная с 1 января 1970 г
00:00:00 UTC. Годы не разделяются на високосные.
times
Возвращает 4-х элементный массив значений:
($user, $system, $cuser, $csystem) = times;
где:
- $user - пользовательское время процесса в секундах.
- $system - системное время текущего процесса.
- $cuser - время процесса-потомка текущего процесса.
- $csystem - его системное время.
tr///
Оператор транслятор. Подробно смотри главу "Операторы".
truncate файл, длина
truncate выражение, длина
Усекает длину указанного файла.
uc выражение
Возвращает строку выражения, в которой малые буквы заменены
на заглавные.
ucfirst выражение
Возвращает строку выражения, в которой первая буква заменена
на заглавную.
umask выражение
umask
Устанавливает маску umask и возвращает старое значение.
Без аргумента возвращает текущее значение.
undef выражение
undef
Делает неопределенным значение выражения. Применяется
только для скалярных переменных, целых массивов или подпрограмм.
Всегда возвращает неопределенное значение.
unlink список
Удаляет файлы, указанные в списке. Возвращает количество
удаленных файлов. Только супервизор может удалять директории
с файлами, если Perl запущен с ключом -U.
unpack шаблон, выражение
Функция, обратная pack(). Распаковывает строку выражения
по указанному шаблону в массив значений. В скалярном контексте
возвращает значение только первого элемента. Шаблоны такие же
как и в pack().
Символ '%' в шаблоне означает, что вы хотите получить вместо
значения его контрольную сумму. По умолчанию - 16-битную.
untie переменная
Исключает переменную из класса указанного tie().
unshift массив, список
Противоположное shift. Помещает элементы списка
в начало массива.
use модуль список
use модуль
Указывает библиотечный модуль, из которого можно
вызывать подпрограммы. Список перечисляет имена подпрограмм, которые
добавляются к текущей области имен. Если не указан, то все имена.
Действие аналогично блоку:
BEGIN { require модуль; import модуль список; }
Сам модуль должен располагаться в системной области Perl файлов.
utime список
Изменяет дату обращения и модификации файлов из списка.
Первые два элемента списка должны указывать новое значение даты
обращения и модификации.
Возвращает количество измененных файлов.
values хеш
Возвращает обычный массив со всеми значениями хеша.
В скалярном контексте возвращает количество значений хеша.
vec выражение, смещение, бит
Возвращает значение строки как вектор беззнаковых целых.
wait
Ожидать окончание порожденного процесса. Возвращает
PID для родительского процесса или -1, если нет - процесса потомка.
Код завершения записывается в переменную $?.
waitpid PID, FLAGS
Ожидать окончания процесса потомка с указанным PID.
Возвращает либо PID этого процесса либо -1 если нет такого процесса.
Код завершения записывается в переменную $?.
wantarray
Возвращает true, если подпрограмма вызывается в списковом
контексте и false - в скалярном.
warn список
Выводит в стандартный поток ошибок STDERR сообщение
аналогично die(), но не прекращает работу программы.
write файл
write выражение
write
Выводит в файл форматированные данные по оператору
format. По умолчанию имя формата совпадает с именем указателя файла.
Имя файла по умолчанию можно изменить функцией select(), а имя
формата при этом надо присвоить переменной $~.
Заголовок листа пишется автоматически. Если на листе не хватает
места для вывода, то выводится "перевод формата" и специальная
форма заголовка листа, затем сами записи.
По умолчанию имя формата заголовка листа состоит из имени указателя
файла и добавленной строки "_TOP". Динамически это можно делать,
присваивая формат переменной $^. Количество оставшихся строк листа
содержится в переменной $- и если присвоить ей 0, то произойдет
смена листа. Подробно описание форматов смотри в главе Форматы.
y///
Оператор транслятор. Смотри главу Операторы.
[Назад]
[Содержание]
[Вперед]
|