Perl 函数集小结

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


函数名 warn

调用语法 warn (message);
解说 与die类似,区别是不终止程序。
例子 warn("Danger! Danger!n");
结果输出 Danger! Danger!

函数名 exit

调用语法 exit (retcode);
解说 终止程序并指定返回值。
例子 exit(2);
结果输出 无

函数名 kill

调用语法 kill (signal, proclist);
解说 给一组进程发送信号。
signal是发送的数字信号,9为杀掉进程。
proclist是进程ID列表。详见kill的UNIX帮助。
例子  
结果输出  

3、进程控制函数

函数名 sleep

调用语法 sleep (time);
解说 将程序暂停一段时间。time是停止的秒数。返回值为实际停止的秒数。
例子 sleep (5);
结果输出 无

函数名 wait

调用语法 procid = wait();
解说 暂停程序执行,等待子进程终止。
不需要参数,返回值为子进程ID,如果没有子进程,返回-1。
例子  
结果输出  

函数名 waitpid

调用语法 waitpid (procid, waitflag);
解说 暂停程序执行,等待特定的子进程终止。procid为等待的进程ID
例子 $procid = fork();
if ($procid == 0) {
  # this is the child process
  print ("this line is printed firstn");
  exit(0);
} else {
  # this is the parent process
  waitpid ($procid, 0);
  print ("this line is printed lastn");
}
结果输出 $ program
this line is printed first
this line is printed last
$

4、其它控制函数

函数名 caller

调用语法 subinfo = caller();
解说 返回调用者的程序名和行号,用于Perl Debugger。
返回值为三元素的列表:
1、调用处的包名
2、调用者文件名
3、调用处的行号
例子  
结果输出

函数名 chroot

调用语法 chroot (dir);
解说 改变程序的根目录,详见chroot帮助。
例子  
结果输出  

函数名 local

调用语法 local($variable);
解说 在语句块(由大括号包围的语句集合)中定义局域变量,仅在此语句块中起作用,对其
的改变不对块外同名变量造成影响。
千万不要在循环中使用,否则每次循环都定义一个新的局域变量!
例子  
结果输出  

函数名 times

调用语法 timelist = times
解说 返回该程序及所有子进程消耗的工作时间。
返回值为四个浮点数的列表:
1、程序耗用的用户时间
2、程序耗用的系统时间
3、子进程耗用的用户时间
4、子进程耗用的系统时间
例子  
结果输出  

二、数学函数

函数名 sin

调用语法 retval = sin (value);
解说 参数为弧度值。

函数名 cos

调用语法 retval = cos (value);