Select Code to Download

my %display = (
    english => {
...
        # vert is green, but I forgot the word for blue ;-)
    }
}

my $scr_display = $display{spanish};
print  $scr_display->{red}, "\n";      # prints rojo

# Now switch to a different language
$scr_display = $display{french};
print $scr_display->{red}, "\n";       # prints rouge