|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Sergey Leschenko 2:5020/400 11 Feb 2004 16:15:13 To : Roman V Tchemisov Subject : Re: Пауза в программе --------------------------------------------------------------------------------
Roman V Tchemisov wrote:
> Hужно сделать задержку в программе.
> Скрипт запускается в 02:29:00, выполняет подготовительные действия. После
> этого нужно
> сделать паузу до 02:29:50. Затем поработать до 02:30:10 и после этого
> завершить работу.
>
> Я ничего лучше:
>
> while ((localtime)[2].(localtime)[1].(localtime)[0] < '022950') {}
например, такой вариант:
use Time::Local;
$wakeup = timelocal(50, 29, 2, ... );
sleep($wakeup - time());
...
--
Best regards,
Sergey
--- ifmail v.2.15dev5.3
* Origin: Adamant ISP news server (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/13411ce02271b.html, оценка из 5, голосов 10
|