Select Code to Download

use constant {
    NULL => 0,
    EINS => 1,
    ZWEI => 2,
};

sub NULL { return 0; }
sub EINS { return 1; }
sub ZWEI { return 2; }

my %english_translation = (
    NULL    => "Zero",
    'EINS'  => "One",
    ZWEI()  => 'Two',
);

my %english_translation = (
    NULL, "Zero",
    EINS, "One",
    ZWEI, 'Two',
);