SPUG: Re: Loop styles: goto vs. redo

[SPUG-list-owner]

> Remember people, as ridiculous as it may (and certainly does) sound,
> the [s]ub word is illegal in posts to this list (thanks to Majordomo).
> -Tim

Why not put it in a subroutine and use recursion?

Zub Tests {
    my $done = 0;
    for (...) {
        unless (...) {
            ...
            $done = 1;
        }
    }
    &Tests unless $done;
}  
  
>> Ken Clarke
>> Contract Web Programmer / E-commerce Technologist
>> www.perlprogrammer.net :: www.modperldev.com


----- End forwarded message -----

-- 
*==============================================================================*
|  Tim Maher, CEO, CONSULTIX  (206) 781-UNIX; (866) DOC-PERL; (866) DOC-LINUX  |
|   tim at consultix-inc.com  teachmeunix.com  teachmeperl.com  teachmelinux.net  |
| 7/29:D'base w/Perl 8/19:UNIX  8/26:Perl Prog  9/18:Int Perl  9/23:Sh & Utils |
*- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - *
| NEW Seminar Series!  "DAMIAN CONWAY's Adv. Perl Workshop";   Seattle 7/15-18 |
|          Adv. OOP  *  Adv. Module Techniques  *  Programming Perl 6          |
*==============================================================================*

 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
     POST TO: spug-list at pm.org       PROBLEMS: owner-spug-list at pm.org
      Subscriptions; Email to majordomo at pm.org:  ACTION  LIST  EMAIL
  Replace ACTION by subscribe or unsubscribe, EMAIL by your Email-address
 For daily traffic, use spug-list for LIST ;  for weekly, spug-list-digest
     Seattle Perl Users Group (SPUG) Home Page: http://seattleperl.org