Засыпание сценария

Функция sleep о прерывает выполнение сценария на указанное время. По истечении срока сценарий продолжит работу:
sleep(<Время в секундах>);
Для примера: выведем начальное время, затем прервем выполнение скрипта на 30 секунд. По истечении срока выведем конечное время. Исходный код программы приведен тут:
#!/usr/bin/perl -w
use CGI::Carp qw(fatalsToBrowser);
print "Content-type: text/html\n\n";
print "Начало: ", time(), "<BR>";
sleep(30); # Засыпание сценария на 30 секунд
print "Конец: ", time();
Вывод:
Начало: 1218556140 Конец: 1218556170