Cross Reference: /opensolaris-onvv-gate/usr/src/cmd/perl/5.8.4/distrib/lib/unicore/mktables

89 my %TableInfo;
141     if (not $TableInfo{$Type}->{$Name})
143         $TableInfo{$Type}->{$Name} = $Table;
508     if (not $TableInfo{$Type}->{$Name})
511         if ($TableInfo{$Type}->{$CName}) {
517     if ($TableInfo{$Alias}) {
1407 ##       %TableInfo;
1423         for my $Name (sort {length $a <=> length $b} keys %{$TableInfo{$Type}})
1426             my $Table   = $TableInfo{$Type}->{$Name};
1532             my $Table = $TableInfo{$Type}->{$Name};