Perl 怎么把一个字符化为ACSII 码值？my $char Lmy $int[解决办法]~/ perl -e print(ord(L))76
Perl 怎么把一个字符化为ACSII 码值？
my $char = 'L';
my $int;
[解决办法]
~/ perl -e "print(ord('L'))"
76
Perl 怎么把一个字符化为ACSII 码值？
my $char = 'L';
my $int;
[解决办法]
~/ perl -e "print(ord('L'))"
76