本文和大家重点讨论一下Perl标量转换函数的用法，比如，函数chop，它的调用语法是$lastchar=chop(var)，表示解说var可为变量或数组，当var为变量时，***一个字符被删除并赋给$lastchar，当var为数组/列表时，所有元素的***一个字符被删除，***一个元素的***一个字母赋给$lastchar。
Perl标量转换函数
Perl标量转换函数名 chop
调用语法$lastchar=chop(var);
解说var可为变量或数组，当var为变量时，***一个字符被删除并赋给$lastchar，当var为数组/列表时，所有元素的***一个字符被删除，***一个元素的***一个字母赋给$lastchar。
Perl标量转换函数名 chomp
调用语法result=chomp(var);
解说检查字符串或字符串列表中元素的***一个字符是否为由系统变量$/定义的行分隔符，如果是就删除。返回值为实际删除的字符个数。
Perl标量转换函数名 crypt
调用语法result=crypt(original,salt);
解说用DES算法加密字符串，original是将要加密的字符串，salt是两个字符的字符串，定义如何改变DES算法，以使更难解码。返回值为加密后的串。
Perl标量转换函数名 hex
调用语法decnum=hex(hexnum);
解说将十六进制数(字符串形式)转化为十进制数。
Perl标量转换函数名 int
调用语法intnum=int(floatnum);
解说将浮点数舍去小数部分转化为整型数。
Perl标量转换函数名 oct
调用语法decnum=oct(octnum);
解说将八进制数(字符串形式)或十六进制数("0x.."形式)转化为十进制数。
Perl标量转换函数名 ord
调用语法asciival=ord(char);
解说返回单个字符的ASCII值，与PASCAL中同名函数类似。
Perl标量转换函数名 chr
调用语法$char=chr(asciival);
解说返回ASCII值的相应字符，与PASCAL中同名函数类似。
Perl标量转换函数名 pack
调用语法formatstr=pack(packformat,list);
解说把一个列表或数组以在实际机器存贮格式或C等编程语言使用的格式转化（包装）到一个简单变量中。参数packformat包含一个或多个格式字符，列表中每个元素对应一个，各格式字符间可用空格或tab隔开，因为pack忽略空格。
【编辑推荐】
