注册
登录
论坛
搜索
帮助
导航
私人消息 (0)
公共消息 (0)
论坛任务 (0)
系统消息 (0)
好友消息 (0)
帖子消息 (0)
批处理之家
»
Perl
» Perl脚本获取Shell命令的执行结果
[新手上路]
批处理新手入门导读
[视频教程]
批处理基础视频教程
[视频教程]
VBS基础视频教程
[批处理精品]
批处理版照片整理器
[批处理精品]
纯批处理备份&还原驱动
[批处理精品]
CMD命令50条不能说的秘密
[在线下载]
第三方命令行工具
[在线帮助]
VBScript / JScript 在线参考
返回列表
发帖
find
发短消息
加为好友
find
当前离线
UID
44507
帖子
832
精华
0
积分
6744
PB
6618
技术
42
捐助
0
阅读权限
99
在线时间
154 小时
注册时间
2012-1-4
最后登录
2017-3-17
少将
帖子
832
积分
6744
技术
42
捐助
0
注册时间
2012-1-4
1
楼
跳转到
»
正序看帖
打印
字体大小:
t
T
发表于 2012-1-10 14:25
|
只看该作者
[转载教程]
Perl脚本获取Shell命令的执行结果
Perl里可以调用Shell命令,有时需要根据shell命令的返回结果做进一步的工作,如何获得shell的执行结果?
方法有很多:
1. 重定向shell的标准输出或标准错误输出到某临时文件,然后再从临时文件中读出执行结果。
这个办法的好处是可以把标准输出和标准错误输出分开保存!
2.
my $res = `ls`;
复制代码
这种方法很直接,也很想shell
3.
open( my $fh, "ls |") or die "$!";
while ( <$fh> ) {
print;
}
复制代码
把管道用起来,比较新颖。
收藏
分享
返回列表
批处理专区: BAT CMD DOS
BAT求助&讨论
BAT教程&资料
BAT原创&转载
BAT新大陆
BAT转载代码
新手练功
出题挑战
有偿求助
第三方命令行
开源原创工具
iBAT
Take Command
其他脚本区
PowerShell求助&讨论
PowerShell教程&资料
PowerShell原创&转载
VBS求助&讨论
JS / JScript / JavaScript
VBS教程&资料
VBS原创&转载
UNIX/Linux Shell
Python
Perl
网络资源区
电脑技术研讨
精品软件交流
论坛事务区
站务交流
意见反馈
论坛公告
版主申请
交换链接
建站杂谈
活动专区
论坛总版规
[收藏此主题]
[关注此主题的新回复]
[通过 QQ、MSN 分享给朋友]