我的第一个perl脚本
前一段时间去参加了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为什么内置这些命令了。
#!/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为什么内置这些命令了。
發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章
教你用Perl实现Smgp协议
原創
2024-05-06 10:32:43
Koupleless 单进程多应用如何解决兼容问题
原創
2024-06-04 23:14:24
云效 Flow 配置备忘
原創
2024-05-30 11:43:23
研发提效:想快速定制一个OLAP应用?你可以这么做
原創
2024-05-28 11:56:16
【安装部署】Apache SeaTunnel 和 Web快速安装详解
原創
2024-04-16 12:22:36
网页爬虫开发:使用Scala和PhantomJS访问知乎
原創
2024-05-31 00:11:23
浅析MySQL 8.0直方图原理
原創
2024-05-27 10:58:41
一文了解npm install -g和npm install --save-dev的关系
原創
2024-05-21 22:59:29
CaffeineCache Api介绍以及与Guava Cache性能对比| 京东物流技术团队
原創
2024-05-17 23:56:43
数据结构笔记浅记(十四) 树
原創
2024-05-14 00:28:41
Linux下制作Nginx绿色免安装包
原創
2024-04-29 21:38:23
Xmake v2.9.1 发布,新增 native lua 模块和鸿蒙系统支持
原創
2024-04-23 12:10:57
Kotlin 中如何使用 Fuel 库进行代理切换?
原創
2024-04-18 23:26:16
在Python中实现代理服务器的配置和使用方法
原創
2024-04-17 23:25:44