On Tue, Nov 18, 2003 at 11:37:22PM +0100, Seiler Thomas wrote:
> So... lets call a function instead:
> 
>     my $is_ok = 1;
>     for 0..6 -> $t {
>         if abs(@new[$t] - @new[$t+1]) > 3 {
>             $is_ok = 0;
>             last;
>         }
>     }
>     if $is_ok {
>         yada()  # has sideeffects...
>     }

my $t = 0..6;
yada() if none(abs(@new[$t] ^- @new[$t+1])) > 3;

:-P

-Scott
-- 
Jonathan Scott Duff
[EMAIL PROTECTED]

Reply via email to