我的第一个perl脚本

最新推荐文章于 2023-08-12 12:00:28 发布

bipeng

最新推荐文章于 2023-08-12 12:00:28 发布

阅读量534

点赞数

文章标签： perl 脚本 maven build sun

本文链接：https://blog.csdn.net/bipeng/article/details/2062989

版权

前一段时间去参加了sun的一个perl的培训，后来也没有怎么联系，所以写了个自动编译的脚本。

#!/bin/perl
for(<*>)
{
     if(-d "$_/src")
     {
      #qx/cd $_/src/;
      #qx/mvn clean install/;
      #qx/cd ../
      qx"...";
      print qx/pwd/;
     }
     else
     {
     print "#########################/n";
     print "$_ is not build/n";
     }
}

功能很简单的，以为一个目录下有很多并列的项目，用maven管理不可能，以为是独立的项目。但是有的时候想全部build一下，就是少敲点了。
其中遇到一个问题，就是想直接用一些unxi命令，如cd,但是发现他们是新fork一个进程的，才明白perl为什么内置这些命令了。