Lines Matching refs:codeset
42 my $codeset = @_ > 0 ? shift : LOCALE_CODE_DEFAULT;
53 if ($codeset == LOCALE_CODE_NUMERIC)
63 if (exists $CODES->[$codeset]->{$code})
65 return $CODES->[$codeset]->{$code};
85 my $codeset = @_ > 0 ? shift : LOCALE_CODE_DEFAULT;
90 if (exists $COUNTRIES->[$codeset]->{$script})
92 return $COUNTRIES->[$codeset]->{$script};
135 my $codeset = @_ > 0 ? shift : LOCALE_CODE_DEFAULT;
137 return keys %{ $CODES->[$codeset] };
148 my $codeset = @_ > 0 ? shift : LOCALE_CODE_DEFAULT;
150 return values %{ $CODES->[$codeset] };