my %capitol_map = (
    WISCONSIN , "Madison",
    ILLINOIS  , "Springfield",
    ...
);

##</code><code>##

my %capitol_map = (
    &WISCONSIN => "Madison",
    ILLINOIS()  => "Springfield",
    ...
);

##</code><code>##

print $capitol_map{+WISCONSIN};