From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <i@stingr.net>
Date: Sun, 15 Dec 2002 19:35:41 +0300
From: Paul P Komkoff Jr <i@stingr.net>
To: Paul P Komkoff Jr <sarlug@lug.ru>
Subject: Re: [Sarlug] Re[2]: Howdy!
Message-ID: <20021215163541.GO3240@stingr.net>
Mail-Followup-To: Paul P Komkoff Jr <sarlug@lug.ru>
References: <200212142022.30878.horohorinev@mail.ru> <779947523.20021215005825@yandex.ru> <200212150743.25733.amodeus@pisem.net> <1789026002.20021215120717@medforyou.ru> <20021215102404.GI3240@stingr.net> <19816421978.20021215141032@medforyou.ru> <20021215112627.GK3240@stingr.net> <12718773018.20021215144942@medforyou.ru> <20021215143118.GL3240@stingr.net> <18532710752.20021215184158@medforyou.ru>
Mime-Version: 1.0
Content-Type: text/plain; charset=koi8-r
Content-Disposition: inline
Content-Transfer-Encoding: 8bit
In-Reply-To: <18532710752.20021215184158@medforyou.ru>
User-Agent: Agent Darien Fawkes
X-Mailer: Intel Ultra ATA Storage Driver
X-RealName: Stingray Greatest Jr
Organization: Department of Fish & Wildlife
Sender: sarlug-admin@lug.ru
Errors-To: sarlug-admin@lug.ru
X-BeenThere: sarlug@lug.ru
X-Mailman-Version: 2.0.9
Precedence: bulk
Reply-To: sarlug@lug.ru
List-Unsubscribe: <http://lug.ru/mailman/listinfo/sarlug>,
	<mailto:sarlug-request@lug.ru?subject=unsubscribe>
List-Id: Saratov Linux User Group Maillist <sarlug.lug.ru>
List-Post: <mailto:sarlug@lug.ru>
List-Help: <mailto:sarlug-request@lug.ru?subject=help>
List-Subscribe: <http://lug.ru/mailman/listinfo/sarlug>,
	<mailto:sarlug-request@lug.ru?subject=subscribe>
List-Archive: <http://lug.ru/pipermail/sarlug/>
Archived-At: <http://lore.altlinux.org/sarlug/20021215163541.GO3240@stingr.net/>
List-Archive: <http://lore.altlinux.org/sarlug/>
List-Post: <mailto:sarlug@lists.lug.ru>

Replying to corax@medforyou.ru:
> Знаешь, чУвак, возможно я тебя не понял, я рад что ты знаешь что ЭТО
> означает, но если бы я использовал эту конструкцию {{}} то только для
> объединения последовательности команд (операторов) в один блок со
> своей лексической областью видимости, а скорее всего наверняка нашел
> бы другое решение ...
> 
> Жду твоих обстоятельных обяснений использования {{}}

Когда, господи, когда придёт моё время?!
Когда среди всех суперкрутых специалистов по перлу мне перестанут
попадаться те, которые не умеют читать документацию (perldoc perlsyn 5
экранов вниз)

       See the do entry in the perlfunc manpage.  Note also that
       the loop control statements described later will NOT work
       in this construct, because modifiers don't take loop
       labels.  Sorry.  You can always put another block inside
       of it (for "next") or around it (for "last") to do that
       sort of thing.  For "next", just double the braces:

           do {{
               next if $x == $y;
               # do something here
           }} until $x++ > $z;

       For "last", you have to be more elaborate:

           LOOP: {
                   do {
                       last if $x = $y**2;
                       # do something here
                   } while $x++ <= $z;
           }


> Специально для 4800 (удалил свою [censored] сигнатуру)

Благодарю.

-- 
Paul P 'Stingray' Komkoff 'Greatest' Jr /// (icq)23200764 /// (http)stingr.net
  When you're invisible, the only one really watching you is you (my keychain)