Создание серверных приложений на языке PERL




П2.4.4 Встроенные функции - часть 2


chmod 700 @executables;

chown LIST Изменяет хозяина или группу, которой принадлежит список файлов. Первыми двумя аргументами должны быть uid и gid. Возвращает количество успешных изменений.

chr NUMBER Возвращает символ, представленный номером NUMBER в наборе символов. Например, chr(65) вернет A.

close FILEHANDLE Закрывает файл с дескриптором FILEHANDLE. Для более подробной информации читайте manual page. open(OUTPUT '/usr/home/petrov');

...

close OUTPUT;

closedir DIRHANDLE Закрывает каталог открытый вызовом opendir().

connect SOCKET,NAME Пытается соединиться с удаленным сокетом (по аналогии с системным вызовом). Возвращает TRUE в случае успешного соединения и FALSE в противоположном случае. Переменная NAME должна содержать запакованный адрес соответствующего данному сокету типа.

cos EXPR Возвращает косинус EXPR, выраженного в радианах. Если EXPR опущено, возвращает косинус $_.

dbmopen ASSOC, DBNAME, MODE Связывает dbm(3) или ndbm(3) файл с ассоциативным массивом. ASSOC - имя ассоциативного массива. DBNAME - имя базы данных (без .dir или .pag расширения). Если база данных не существует, то она создается с правами доступа указанными в MODE. dbmopen(%HIST,'/usr/lib/news/history', 0600);

while (($key, $val) = each %HIST){

print $key, '=', unpack('L',$val),\n;}

dbmclose(%HIST);

dbmclose ASSOC Прерывает связь между файлом и ассоциативным массивом.

defined EXPR Возвращает TRUE или FALSE, в зависимости от того определено значение EXPR или нет. Многие операции возвращают неопределенное значение в случае конца файла, неинициализированной переменной, системной ошибки или при подобной ситуации. Если речь идет о хэше, то defined покажет только определены ли ли величины, ничего не говоря о существовании ключей. Для определения существования ключей используется функция exists().

delete EXPR Стирает указанную величину. Возвращает удаленную величину или значение не определено в случае, если удаление не произошло. foreach $key (keys %array) {

delete $array{$key};

}Но более быстро то же самое можно сделать используя функцию undef().

die LIST Вне eval() печатает значение LIST в STDERR и выходит из программы с текущим значением $!. Если значение $! есть ноль, то принимает значение $? >> 8. Если значение $? >> 8 есть ноль, то принимает значение 255. Внутри eval() сообщение об ошибке помещается в переменную $@ и eval() прерывается с неопределенным значением. open(FL, "/root/rm-rf") || die "Can't open file.\n";




Содержание  Назад  Вперед