in reply to constant not evaluated

I didn't check, but I bet the order of precedence dictates that
my $b = { EARL.HARRIS => 55 };
is
my $b = { EARL . (HARRIS => 55) };
which is
my $b = { EARL . ('HARRIS', 55) };
Try
my $b = { (EARL.HARRIS) => 55 };

mel brooks MELBROOKS

Update: Extra ')' removed

Replies are listed 'Best First'.
Re^2: constant not evaluated
by TheEnigma (Pilgrim) on Sep 20, 2004 at 18:17 UTC
    ikegami, you have an extra ) after the 55.
    I removed that and it worked.

    TheEnigma