my %k = (0 => 'ÄÄÄ', 1=>'TOLL!'); print $k{1};