解说 参数为弧度值。
函数名 atan2
调用语法 retval = atan2 (value1, value2);
解说 运算并返回value1除以value2结果的arctan值,单位为弧度,范围在-PI~PI。
应用例:
角度转化成弧度子程序。 sub degrees_to_radians {
local ($degrees) = @_;
local ($radians);11:
$radians = atan2(1,1) * $degrees / 45;
}
函数名 sqrt
调用语法 retval = sqrt (value);
解说 平方根函数。value为非负数。
函数名 exp
调用语法 retval = exp (value);
解说 返回e的value次方。
函数名 log
调用语法 retval = log (value);
解说 以e为底的自然对数。
函数名 abs
调用语法 retval = abs (value);
解说 绝对值函数。(Perl 4中没有)
函数名 rand
调用语法 retval = rand (num);
解说 随机数函数,返回0和整数num之间的一个浮点数。
函数名 srand
调用语法 srand (value);
解说 初始化随机数生成器。保证每次调用rand真正随机。
三、字符串处理函数
函数名 index
调用语法 position = index (string, substring, position);
解说 返回子串substring在字符串string中的位置,如果不存在则返回-1。参数position
是可选项,表示匹配之前跳过的字符数,或者说从该位置开始匹配。
函数名 rindex
调用语法 position = rindex (string, substring, position);
解说 与index类似,区别是从右端匹配。
函数名 length
调用语法 num = length (string);
解说 返回字符串长度,或者说含有字符的数目。
函数名 pos
调用语法 offset = pos(string);
解说 返回最后一次模式匹配的位置。
函数名 substr
调用语法 substr (expr, skipchars, length)
解说 抽取字符串(或表达式生成的字符串)expr中的子串,跳过skipchars个字符,或者
说从位置skipchars开始抽取子串(第一个字符位置为0),子串长度为length,此参数可
忽略,意味着取剩下的全部字符。
当此函数出现在等式左边时,expr必须为变量或数组元素,此时其中部分子串被等式右边
的值替换。
函数名 study
调用语法 study (scalar);
解说 用一种内部格式提高变量的访问速度,同一时刻只对一个变量起作用。
函数名 lc
uc
调用语法 retval = lc(string);
retval = uc(string);
解说 将字符串全部转换成小/大写字母。
函数名 lcfirst
ucfirst
调用语法 retval = lcfirst(string);
retval = ucfirst(string);
解说 将第一个字母转换成小/大写。
函数名 quotameta
调用语法 newstring = quotemeta(oldstring);
解说 将非单词的字母前面加上反斜线()。
语句 : $string = quotemeta($string);
等效于:$string =~ s/(W)/$1/g;
常用于模式匹配操作中,确保字符串中没有字符被看作匹配操作符。









