Lines Matching refs:chr
85 # chr() works in native space so convert value from table
86 # into that space before using chr().
87 my $ch = chr(utf8::unicode_to_native($_[0]));
96 ## my ($ch,$page) = @_; return chr($ch);
97 return chr $_[0];
103 ## my ($ch,$page) = @_; return chr($page).chr($ch);
104 return chr ($_[1]) . chr $_[0];
113 return chr ($_[1]) . chr $_[0] if $_[1];
114 return chr $_[0];
398 #$erep = join('',map(chr(hex($_)),@byte));
422 my $ech = join('',map(chr(hex($_)),@byte));