被调用的脚本 “diaoyong.pl” 代码:
#! /usr/bin/perl
($a) = @ARGV;
$b = $a*10;
print("$a,$b\n");
该脚本需要我们输入一个参数,将该参数乘以10后输出;
接着利用system函数来调用该脚本,进行调用的脚本“system.pl”代码:
#! /usr/bin/perl
($c) = @ARGV;
system("perl diaoyong.pl 10");
print("$c\n");
看到第三行,其中10便是“diaoyong.pl”中需要输入的参数,如果我们在终端输入perl system.pl 1
最终结果为:
10,100
1