Perl 怎么把一个字符化为ACSII 码值？
my $char = 'L';
my $int;
[解决办法]

~/ perl -e "print(ord('L'))"
76