|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Dmitriy MiksIr 2:5020/400 19 Feb 2001 01:40:58 To : Edward Smirnov Subject : Re: снова форк -------------------------------------------------------------------------------- Edward Smirnov <ed@microolap.com> пишет: ES> Чайнику помогите...... ES> Родитель ждет, когда умрет ребенок. ES> unless (defined ($pid = fork)) {die "cannot fork: ES> $!";} ES> unless ($pid) ES> { ES> # Kid close STDIN; close STDOUT; close STDERR; ES> open (MAIL, "|$mailprog -t") ES> || print "Can't start mail program"; ES> print MAIL "To: $mailto"; ES> print MAIL "From: $mailfrom"; ES> close (MAIL); ES> sleep (60); # Отчего родитель ждет этого? ES> # Kid stops here ES> exit; ES> } ES> # Parent continues here ES> print "Location: < Hу там .zip...>"; ES> close STDOUT,STDIN,STDERR; ES> ................................................. ES> .... -- ------------------------------------------------------------- MiksIr <miksir@mixup.org.ru> http://www.miksir.pp.ru/ Отправлено через сервер Talk.Ru - http://www.talk.ru --- ifmail v.2.15dev5 * Origin: Talk.ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6488bb7b66fa.html, оценка из 5, голосов 10
|