Perl практика



              

CGI-программа гостевой книги.


Создание файла:

touch /usr/tmp/chatfile chmod 0666 /usr/tmp/chatfile

Блокирование доступа:

use Fcntl qw(:flock); # импортирует LOCK_EX, ... ... flock(CHANDLE, LOCK_EX) bail("Cannot flock $CHATNAME: !$");




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