Perl syscall 函数

• 

  描述

  syscall 函数调用指定为列表第一个元素的系统调用，并将其余元素作为参数传递给系统调用。如果给定的参数是数字，则该参数作为int传递。如果不是，则传递指向字符串值的指针。
• 

  句法

  以下是此函数的简单语法-

  
  syscall EXPR, LIST
  

  复制
• 

  返回值

  如果系统调用失败，则此函数返回-1；如果系统调用成功，则该函数返回的值。
• 

  示例

  以下是显示其基本用法的示例代码-

   
  require("syscall.ph");
  $pid = syscall(&SYS_getpid);
  
  print "PID of this process is $pid\n";
  
  # To create directory use the following
  $string = "newdir";
  syscall( &SYS_mkdir, $string );
  

  复制

  尝试一下

  执行以上代码后，将产生以下结果-

  
  PID of this process is 14020
  

  复制