perl shell脚本互调

1 shell echo 命令会自动加入换行符

2. $?接受exit 返回值

3.变量等于`执行脚本` ，变量获取的值为脚本最后向STDOUT输出的值

例子如下

1. perl 调用shell

1.sh中的内容

#!/usr/bin/sh
echo `date`;
exit 1;

test.pl中的内容

  1   use strict; 

  2 use warnings;                                                                                              
  3 my $s=`sh 1.sh`;                                                                                         
  4 print STDOUT "$s";                                                                                           
  5 my $exitcode=$?>>8;                                                                                                            
  6 print "$exitcode\n"; 

2 shell调用perl

shell 脚本实例

#!/usr/bin/sh
s=`perl PrepareEnvironment.pl`
echo $?;
echo $s;

3. perl中system命令，不能执行system("cd xxx");

ln -sf $s/good.dic  ../Dic/Dic/good.dic ln 命令在创建软连接时，第一个参数必须是绝对路径

touch a.txt ,当a.txt存在的时候，touch的作用仅是改变文件的时间戳标识。