|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/371.32 26 Jun 2000 15:18:33 To : yu@frigate.kiev.ua Subject : Re: как запустить ? -------------------------------------------------------------------------------- PK>> Кстати, в 5.6 специально для таких случаев (и не только) добавили PK>> 3х параметровый open. Теперь можно будет писать PK>> open F, "<", $filename or die $!; и чихать на наличие '<>' и пр. PK>> в имени файла (работать будет не во всех PK>> операционках, но выдаст ошибку). Естественно в качестве второго PK>> параметра будут работать все варианты, которые PK>> работают и сейчас. Кроме того при работе с pipes, в этом случае не PK>> будет вызываться shell (аналогично system с PK>> параметрами) что тоже неплохо с точки зрения безопасности. yfku> А чем благородного дона не устраивает следующая конструкция? yfku> my $rc = open (SENDMAIL,'|-'); yfku> die "Can't fork: $!" unless defined $rc; yfku> if ($rc == 0) { yfku> exec ('/usr/sbin/sendmail','-t') yfku> or die "Can't exec: $!"; yfku> } yfku> print SENDMAIL "Bla-bla-bla\n"; yfku> close SENDMAIL; Количеством набиваемых символов. ==== 8< [!man perl] ==== The three principal virtues of a programmer are Laziness, Impatience, and Hubris. See the Camel Book for why. ==== >8 [!man perl] ==== Что я люблю в Perl, так это то, что идиомы в нём рано или поздно становятся операторами. Иначе бы я писал на C. -- Счастливо! Ран. --- ifmail v.2.14.os-p7-tma3 * Origin: MemoNet (2:5020/371.32@fidonet) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/347337314e25.html, оценка из 5, голосов 10
|