perl下载安装教程perl运⾏其他程序的5种⽅法1.使⽤system函数运⾏成功,返回0,运⾏失败则返回⾮负整数
system("cmd");
2.使⽤qx
my $cmd1=qx/date/;
3.使⽤`` 与qx等效
4.使⽤open函数
open(CMD,“ifconfig |”) or die $!
my @result=<CMD>;
close(CMD);
5.使⽤readpipe函数
使⽤readpipe函数可以获取外部程序运⾏的结果,⽐如运⾏ ls 会列出当前⽬录的⽂件和⽂件夹,my $result=readpipe("ls ");
#!/usr/bin/perl
use strict;
my$return=system("date");
print"this is system function , successful:return $return\n";
$return=system("not_exist");
print"this is sysyem function failed,return $return\n";
#use qx
my$cmd1=qx/pwd/;
print"this time use qx $cmd1";
#qx=``
my$cmd2=`pwd`;
print"this time use \`\` $cmd2 ";
open(CMD,"echo \"\$(date +\%Y\%m\%d)\"|") or die $!;
my@result=<CMD>;
close(CMD);
print@result;
my $result=readpipe("ls -rtl");
print $result;
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论