in reply to Re: use constant for strings (unary plus)
in thread use constant for strings

use constant KEY => "key";

my %h = ( +KEY => "data" , KEY() => "data",);

$, = "\n";
print "Perl vers: $]", keys %h;

[download]
Outputs: 
Perl vers: 5.006001
KEY
key

[download]

Replies are listed 'Best First'.
Re^3: use constant for strings (unary plus)
by Aristotle (Chancellor) on Apr 18, 2003 at 20:49 UTC
    Gack, you're right.

    Makeshifts last the longest.

[reply]

In Section Seekers of Perl Wisdom