On Fri, Dec 14, 2001 at 10:58:06PM -0800, David Wheeler wrote:
> Given this script, what would you expect the output to be?
Depends on whether you're running bleadperl or not. :)
> #!/usr/bin/perl -w
>
> use strict;
>
> my %hash = (Perm => 1);
>
> my @keys = keys %hash;
> print "Keys: @keys\n";
> test();
> @keys = keys %hash;
> print "Keys: @keys\n";
>
> sub test { local $hash{Temp} = 'UTC' }
>
> __END__
>
> Hint: IMO, this is rather bug-like.
>
> Regards,
>
> David
>
> --
> David Wheeler AIM: dwTheory
> [EMAIL PROTECTED] ICQ: 15726394
> Yahoo!: dew7e
> Jabber: [EMAIL PROTECTED]
>
>
>
--
Michael G. Schwern <[EMAIL PROTECTED]> http://www.pobox.com/~schwern/
Perl Quality Assurance <[EMAIL PROTECTED]> Kwalitee Is Job One
flatulent no more,
I only make large bubbles
of paste from my ass.
-- japhy