On 8/17/07, Chas Owens <[EMAIL PROTECTED]> wrote:
snip
> warnings pragma).  I think it is a variant of the classic obscenity
snip
>         my $var if 0;
snip
> still around (or has reemerged).  Maybe Perl 6 will finally kill it (I
> have to test it in Pugs now).
snip

Pugs prints five zeros, so it looks like Perl 6 (or at least the Pugs
variant) will get rid of that obscenity at least partially (it still
didn't complain that $var was not declared).  However, given this
code:

#!/usr/bin/pugs

{
        my $i;
        sub iter {
                return $i++;
        }
}

say iter() for 1 .. 5;

say $i; #$i should not be in scope

pugs says

0
1
2
3
4
*** Undeclared variable: "$i"
    at t.pl line 12, column 1-7

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to