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