|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Alex Povolotsky 2:5020/145 21 Apr 2001 11:07:15 To : rit1@peterlink.ru Subject : Re: Аварийный выход из Perl -------------------------------------------------------------------------------- .RFC-X-Complaints-To: usenet@shuttle.svib.ru .RFC-NNTP-Posting-Date: Sat, 21 Apr 2001 07:07:16 +0000 (UTC) .RFC-X-Newsreader: Gnus v5.6.45/XEmacs 21.1 - "Cuyahoga Valley" From: Alex Povolotsky <tarkhil@over.ru> >>>>> "rit1" == rit1 writes: > $dir = "d:/home/ruslaws_old/Russian/Law/Doc"; @DIRLIST = $dir; sub > process { next if $_ =~/\.\.?$/; # Пропустить . и .. print "$_\n"; } > find(\&process, @DIRLIST); > ================================================== Без строки с next цикл > работает нормально, но мне нужно пропустить корневые директории. Скажи, пожалуйста, КУДА пойдет next? ГДЕ у тебя цикл? Что вообще делает next? -- Alex. --- ifmail v.2.15 * Origin: Minas Tirith (2:5020/145@fidonet) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/1040063f1d017.html, оценка из 5, голосов 10
|