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


in reply to Module constant and constants in Hashes

another option is: 
my %english_translation = (
    NULL() => "Zero",
    EINS() => "One",
    ZWEI() => "Two",
);

[download]
Boris

In Section Seekers of Perl Wisdom