Searched defs:Alias (Results 1 - 1 of 1) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/ext/Encode/lib/Encode/
H A DAlias.pm1 package Encode::Alias;
18 our @Alias; # ordered matching list
19 our %Alias; # cached known aliases
25 unless (exists $Alias{$find})
27 $Alias{$find} = undef; # Recursion guard
28 for (my $i=0; $i < @Alias; $i += 2)
30 my $alias = $Alias[$i];
31 my $val = $Alias[$i+1];
55 $Alias{$find} = $enc;
63 if (my $e = $Alias{
[all...]

Completed in 14 milliseconds