Perl 函数集小结

2019-10-01 12:36:51王振洲

函数名 join

调用语法 join (joinstr, list);
解说 把字符串列表(数组)组合成一个长的字符串,在每两个列表元素间插入串joinstr。

函数名 sprintf

调用语法 sprintf (string, fields);
解说 与printf类似,区别是结果不输出到文件,而作为返回值赋给变量。
例子 $num = 26;
$outstr = sprintf("%d = %x hexadecimal or %o octaln",$num, $num, $num);
print ($outstr);
结果输出 26 = 1a hexadecimal or 32 octal

四、标量转换函数

函数名 chop

调用语法 $lastchar = chop (var);
解说 var可为变量或数组,当var为变量时,最后一个字符被删除并赋给$lastchar,当va
r为数组/列表时,所有元素的最后一个字符被删除,最后一个元素的最后一个字母赋给$l
astchar。

函数名 chomp

调用语法 result = chomp(var);
解说 检查字符串或字符串列表中元素的最后一个字符是否为由系统变量$/定义的行分隔符
,如果是就删除。返回值为实际删除的字符个数。

函数名 crypt

调用语法 result = crypt (original, salt);
解说 用DES算法加密字符串,original是将要加密的字符串,salt是两个字符的字符串,
定义如何改变DES算法,以使更难解码。返回值为加密后的串。

函数名 hex

调用语法 decnum = hex (hexnum);
解说 将十六进制数(字符串形式)转化为十进制数。

函数名 int

调用语法 intnum = int (floatnum);
解说 将浮点数舍去小数部分转化为整型数。

函数名 oct

调用语法 decnum = oct (octnum);
解说 将八进制数(字符串形式)或十六进制数("0x.."形式)转化为十进制数。

函数名 ord

调用语法 asciival = ord (char);
解说 返回单个字符的ASCII值,与PASCAL中同名函数类似。

函数名 chr

调用语法 $char = chr (asciival);
解说 返回ASCII值的相应字符,与PASCAL中同名函数类似。

函数名 pack

调用语法 formatstr = pack(packformat, list);
解说 把一个列表或数组以在实际机器存贮格式或C等编程语言使用的格式转化(包装)到
一个简单变量中。参数packformat包含一个或多个格式字符,列表中每个元素对应一个,
各格式字符间可用空格或tab隔开,因为pack忽略空格。
  除了格式a、A和@外,重复使用一种格式多次可在其后加个整数,如:
   $twoints = pack ("i2", 103, 241);
  把同一格式应用于所有的元素则加个*号,如:
   $manyints = pack ("i*", 14, 26, 11, 83);
  对于a和A而言,其后的整数表示要创建的字符串长度,重复方法如下:
   $strings = pack ("a6" x 2, "test1", "test2");
  格式@的情况比较特殊,其后必须加个整数,该数表示字符串必须的长度,如果长度不够