ord.t revision 7c478bd95313f5f23a4c958a745db2134aa03244
#!./perl
BEGIN {
chdir 't' if -d 't';
}
# compile time evaluation
# 'A' 65 ASCII
# 'A' 193 EBCDIC
# run time evaluation
$x = 'ABC';
$x = 500;
$x = "\x{1234}";