Perl标量转换函数用法指南

本文和大家重点讨论一下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