http://qs321.pair.com?node_id=657339


in reply to $array[ 'Infinity' ]

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.

Replies are listed 'Best First'.
Re^2: $array[ 'Infinity' ]
by rgiskard (Hermit) on Dec 17, 2007 at 16:34 UTC
    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";

    [download]
    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...
[reply]
[d/l]

In Section Seekers of Perl Wisdom