Re: $array[ 'Infinity' ]

[moritz]

It prints only 5\n\n for me (with perl 5.8.8).

The $a['Infinity'] part is not surprising, because the string is coerced into an integer, which is 0.

I was quite surprised though that -Infinity is evaluated as -inf (and $a[-inf] is undef; no surprises here). A quick grep through the pod files in my perl distribution show that Infinity was introduced in perl561delta as a synonym for inf.

It's a bit weird that it dies under strict, IMHO.

[rgiskard]

If you really want a strict version:

use strict;

my @a = (5 .. 10);
print 
    $a['Infinity'], "\n",
    $a['-Infinity'], "\n";
print 
    $a['Infinity'], "\n",
    $a['-Infinity'], "\n";

print 0+"Infinity" . "\n";
print 0+"-Infinity" . "\n";

You still get:

10
5
10
5
inf
-inf

The version:
perl -v
This is perl, v5.8.8 built for cygwin-thread-multi-64int...