Listing

$variable = 1;
@variable = (3,"English","French");
%variable = ('red','Rouge',
             'black','noire',
             'hello','bonjour');
$variable{'blue'}="Bleu";
print "$variable{'red'} means red in $variable[$variable+1]!\n";
print "$variable{'blue'} uses the same characters in $variable[1] and $variable[2].\n";

Output

Rouge means red in French!
Bleu uses the same characters in English and French.