Searched refs:a2e (Results 1 - 2 of 2) sorted by relevance

/openbsd-current/gnu/usr.bin/perl/regen/
H A Debcdic.pl254 my @a2e = @{get_a2n($charset)};
261 output_table(\@a2e, "PL_a2e");
265 $e2a[$a2e[$i]] = $i;
345 $lc[$a2e[$i]] = $a2e[ord lc chr $i];
359 $uc[$a2e[$i]] = $a2e[ord $uc];
377 $ascii_fold[$a2e[ord $chr]] = $a2e[ord lc $chr];
380 $ascii_fold[$a2e[or
[all...]
/openbsd-current/gnu/usr.bin/perl/Porting/
H A Dmakerel129 my $a2e = get_a2n($charset);
176 $low_byte = chr $a2e->[ord $low_byte];
197 $xlated = ($text =~ s/(.)/chr $a2e->[ord $1]/rsge);

Completed in 70 milliseconds