HELL: { eval "die;"; goto HELL; redo; } # You can't redo.

inspired from the CB: thezip requires smelling salts as the following line is accidentally (and unprotectedly) viewed: goto B1;

Replies are listed 'Best First'.
Re: goto hell
by narainhere (Monk) on Dec 12, 2007 at 11:31 UTC
    HELL: { eval "die;"; goto HELL if ($sins>$goods); redo until (!$humanrace); }

    The world is so big for any individual to conquer

      goto HELL if ($sins>$goods);

      In hell, that decision has already been handled far away and long ago.

        goto HELL if ($sins>$goods);

        In hell, that decision has already been handled far away and long ago.

        I personally believe that then the conditional is optimized away by the compiler.

        --
        If you can't understand the incipit, then please check the IPB Campaign.
Re: goto hell
by zentara (Cardinal) on Dec 12, 2007 at 13:15 UTC
    You can't redo

    Unless you are the pope

    P.S. I guess that seals my fate as far as the Vatican is concerned.... and I used to be an altarboy :-)


    I'm not really a human, but I play one on earth. Cogito ergo sum a bum
Re: goto hell
by Anonymous Monk on Dec 12, 2007 at 11:07 UTC
    sub HELL { goto HEAVEN }
Re: goto hell
by tefflox (Initiate) on Dec 15, 2007 at 20:20 UTC
    It carries no curse; your aesthetics are too conforming.
Re: goto hell
by harangzsolt33 (Deacon) on Mar 05, 2026 at 23:00 UTC
    $| = 1; my $LIFE = int(rand() * 120); my $saved = 1; for (my $i = 1; $i <= $LIFE; $i++) { # do something good... print "Happy birthday, Today you're $i yrs old!\n"; if ($i > 10) { $saved = int(rand() * 2); } } DIE(); sub DIE { goto HELL unless ($saved); return $saved; HELL: my $e = ''; for (;;) { for (;;) { for (;;) { for (;;) { $e .= 'B'; } } } } }
Re: goto hell
by jesuashok (Curate) on Dec 19, 2007 at 05:54 UTC