in reply to Converting pascal code to perl

I think it's clear but others might find it too cute:

if ($point >= 2 && $point <= 12) { return (6 - abs(7 - $point)) / 36; }
CrapsFoo

Replies are listed 'Best First'.
Re: Re: Converting pascal code to perl
by Popcorn Dave (Abbot) on Aug 15, 2002 at 04:34 UTC
    That's one I hadn't even thought of. Thanks!

    I do think it's one of the pitfalls you run in to as you get better in perl is trying to do things that "aren't cute" but function just fine.

    Some people fall from grace. I prefer a running start...