[sf-perl] a reason to goto

Quinn Weaver quinn at fairpath.com
Sun Feb 25 11:19:01 PST 2007


On Sat, Feb 24, 2007 at 11:25:23PM -0800, Joe Brenner wrote:

> [...]

> I don't know if it made it out to the list (I think my mail is acting
> flaky at the moment) but the perlish way of doing it is probably this:
> 
>    if ($RANDOMIZE) {
>      {{
>        $i = pick_numeric(0, $numb_cards-1);
>        $j = pick_numeric(0, $numb_cards-1);
>        unless( $REFLEXIVE ) {
>          if ($i == $j) {
>            redo;
>          }
>        }
>      }}
>    }

FYI, it did make it to the list.

-- 
Quinn Weaver, independent contractor  |  President, San Francisco Perl Mongers
http://fairpath.com/quinn/resume/     |  http://sf.pm.org/


More information about the SanFrancisco-pm mailing list