设为首页 收藏本站
云服务器等爆品抢先购,低至4.2元/月
查看: 982|回复: 0

[经验分享] perl脚本调用练习和调用系统命令并展示输出信息

[复制链接]

尚未签到

发表于 2017-5-19 12:57:21 | 显示全部楼层 |阅读模式
准备好一个简单的perl脚本文件
把在windows下使用命令行方式查看系统进程信息输出到一个日志文件中
这里简单编写一个perl脚本文件test.pl,内容如下

#!/usr/bin/perl
#作用:在指定目录下生成日志文件,同时每隔1秒输出一次信息,执行到40次后退出
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time());
$year+=1900;
$mday = ($mday < 10)? "0$mday":$mday;
$mon  = ($mon < 9)? "0".($mon+1):($mon+1);
$hour = ($hour < 10)? "0$hour":$hour;
$min = ($min < 10)? "0$min":$min;
$sec = ($sec < 10)? "0$sec":$sec;
open(STDOUT, "> C:\\perltest\\testperl${year}${mon}${mday}_${hour}${min}${sec}.LOG");
if( $#ARGV < 0 ){
print "没有输入参数,请重新输入参数,程序退出\n";
}else{
$i=0;
while (1) {
if($i==40){
last;
}
print "i = $i \n";
sleep(1);
$i++
}
}
exit;


编写java程序调用,同时也输出命令行任务下的进程信息

import java.io.BufferedReader;
import java.io.FileOutputStream;
import java.io.IOException;
import java.io.InputStream;
import java.io.InputStreamReader;
import java.io.OutputStream;
import java.io.PrintWriter;
import java.text.DateFormat;
import java.text.SimpleDateFormat;
import java.util.Date;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
public class PerlMutilProcessTest {
private static Logger logger = LoggerFactory.getLogger(PerlMutilProcessTest.class);
public static void  asyncExecutePerl(String perlFullFileName,String [] perlParameters)throws IOException{
Runtime   objRunTime   =   Runtime.getRuntime();
String[]  perlParam = null;
if(perlParameters!=null && perlParameters.length > 0){
perlParam =new String[perlParameters.length+2];
perlParam[0]="perl";
perlParam[1]=perlFullFileName;
for(int i=0;i<perlParameters.length;i++){
perlParam[i+2]=perlParameters;
}
}else{
perlParam =new String[2];
perlParam[0]="perl";
perlParam[1]=perlFullFileName;
}
StringBuffer perlCmdStr = new StringBuffer();
for(int j=0;j<perlParam.length;j++){
logger.debug("NO. {} perl argument {}",j, perlParam[j]);
perlCmdStr.append(perlParam[j]).append(" ");
}
logger.debug("start exec");
logger.debug(perlCmdStr.toString());
objRunTime.exec(perlCmdStr.toString());
logger.debug("end exec");
}
public static void  syncExecutePerl(String perlFullFileName,String [] perlParameters,String outputInfoFileName,String outputErrorFileName)throws IOException,InterruptedException{
Runtime   objRunTime   =   Runtime.getRuntime();
String[]  perlParam = null;
if(perlParameters!=null && perlParameters.length > 0){
perlParam =new String[perlParameters.length+2];
perlParam[0]="perl";
perlParam[1]=perlFullFileName;
for(int i=0;i<perlParameters.length;i++){
perlParam[i+2]=perlParameters;
}
}else{
perlParam =new String[2];
perlParam[0]="perl";
perlParam[1]=perlFullFileName;
}
StringBuffer perlCmdStr = new StringBuffer();
for(int j=0;j<perlParam.length;j++){
logger.debug("NO. {} perl argument {}",j, perlParam[j]);
perlCmdStr.append(perlParam[j]).append(" ");
}
logger.debug("start exec");
logger.debug(perlCmdStr.toString());
Process perlProcess = objRunTime.exec(perlCmdStr.toString());
FileOutputStream redirectOutputFile = null;
FileOutputStream errorOutputFile = null;
InputStream errorInputStream = null;
InputStream infoInputStream = null;
try{
errorOutputFile = new FileOutputStream(outputErrorFileName);
redirectOutputFile = new FileOutputStream(outputInfoFileName);
errorInputStream = perlProcess.getErrorStream();
infoInputStream = perlProcess.getInputStream();
ProcessInfo errorPerlProcessInfo = new ProcessInfo(errorInputStream,ProcessInfo.TYPE_ERROR,errorOutputFile);
ProcessInfo outputPerlProcessInfo = new ProcessInfo(infoInputStream,ProcessInfo.TYPE_OUTPUT, redirectOutputFile);
errorPerlProcessInfo.redirect();
outputPerlProcessInfo.redirect();
int exitVal = perlProcess.waitFor();
logger.debug("ExitValue: " + exitVal);
errorOutputFile.flush();
redirectOutputFile.flush();
}catch(IOException ioe){
if(redirectOutputFile!=null){
redirectOutputFile.close();
}
if(errorOutputFile!=null){
errorOutputFile.close();
}
if(errorInputStream!=null){
errorInputStream.close();
}
if(infoInputStream!=null){
infoInputStream.close();
}
throw ioe;
}catch(InterruptedException ie){
if(redirectOutputFile!=null){
redirectOutputFile.close();
}
if(errorOutputFile!=null){
errorOutputFile.close();
}
if(errorInputStream!=null){
errorInputStream.close();
}
if(infoInputStream!=null){
infoInputStream.close();
}
throw ie;
}finally{
if(redirectOutputFile!=null){
redirectOutputFile.close();
}
if(errorOutputFile!=null){
errorOutputFile.close();
}
if(errorInputStream!=null){
errorInputStream.close();
}
if(infoInputStream!=null){
infoInputStream.close();
}
}
logger.debug("end exec");
}
public static void syncExecuteSyscmd(String[] syscmdParameters,String outputInfoFileName)throws IOException,InterruptedException{
if(syscmdParameters==null||syscmdParameters.length==0){
return;
}
StringBuffer syscmdStr = new StringBuffer();
for(int j=0;j<syscmdParameters.length;j++){
logger.debug("NO. {} syscmd argument {}",j, syscmdParameters[j]);
syscmdStr.append(syscmdParameters[j]).append(" ");
}
logger.debug("start exec");
logger.debug(syscmdStr.toString());
Process syscmdProcess = Runtime.getRuntime().exec(syscmdStr.toString());
FileOutputStream redirectOutputFile = null;
InputStream infoInputStream = null;
try{
infoInputStream = syscmdProcess.getInputStream();
redirectOutputFile = new FileOutputStream(outputInfoFileName);
int bufferLen = 10*1024;
byte[] byteBuffer = new byte[bufferLen];
int readLen = infoInputStream.read(byteBuffer);
while (readLen != -1) {
if(readLen==bufferLen){
redirectOutputFile.write(byteBuffer);
}else{
redirectOutputFile.write(byteBuffer,0,readLen);
}
readLen = infoInputStream.read(byteBuffer);
}
}catch(IOException ioe){
if(redirectOutputFile!=null){
redirectOutputFile.close();
}
if(infoInputStream!=null){
infoInputStream.close();
}
throw ioe;
}finally{
if(redirectOutputFile!=null){
redirectOutputFile.close();
}
if(infoInputStream!=null){
infoInputStream.close();
}
}
logger.debug("end exec");
}
public static void main(String[] args){
try{
DateFormat yyyyMMDDhhmmss = new SimpleDateFormat("yyyyMMdd_HHmmSSS");
//PerlMutilProcessTest.asyncExecutePerl("C:\\perltest\\test.pl", null);
//PerlMutilProcessTest.syncExecutePerl("C:\\perltest\\test.pl",null,"C:\\perltest\\perlresult"+yyyyMMDDhhmmss.format(new Date())+".txt","C:\\perltest\\perlerror"+yyyyMMDDhhmmss.format(new Date())+".txt");
//PerlMutilProcessTest.asyncExecutePerl("C:\\perltest\\test.pl", new String[]{"123"});
//PerlMutilProcessTest.syncExecutePerl("C:\\perltest\\test.pl",new String[]{"123"},"C:\\perltest\\perlresult"+yyyyMMDDhhmmss.format(new Date())+".txt","C:\\perltest\\perlerror"+yyyyMMDDhhmmss.format(new Date())+".txt");
PerlMutilProcessTest.syncExecuteSyscmd(new String[]{"cmd","/c","tasklist","/v"}, "C:\\perltest\\syscmdresult"+yyyyMMDDhhmmss.format(new Date())+".txt");
}catch(Exception e){
e.printStackTrace();
}
}
}
class ProcessInfo{
private static Logger logger = LoggerFactory.getLogger(ProcessInfo.class);
public static String TYPE_ERROR = "ERROR";
public static String TYPE_OUTPUT = "OUTPUT";
private InputStream is;
private String type;
private OutputStream os;
public ProcessInfo(InputStream is, String type, OutputStream redirect){
this.is = is;
this.type = type;
this.os = redirect;
}
public void redirect(){
PrintWriter pWriter = null;
InputStreamReader isReader = null;
BufferedReader bReader = null;
try{
if (os != null && ProcessInfo.TYPE_OUTPUT.equals(this.type)){
pWriter = new PrintWriter(os);
}
isReader = new InputStreamReader(is);
bReader = new BufferedReader(isReader);
String line = null;
while ( (line = bReader.readLine()) != null){
if (pWriter != null){
pWriter.println(line);
}
}
if (pWriter != null)
pWriter.flush();
} catch (IOException ioe){
try{
if(isReader!=null){
isReader.close();
}
if(bReader!=null){
bReader.close();
}
if(pWriter!=null){
pWriter.close();
}
}catch (IOException tryioe){
logger.error("输出流出现错误,关闭流时出现异常...", tryioe);
}
logger.error("输出流出现错误...", ioe);
}
}
}

运维网声明 1、欢迎大家加入本站运维交流群:群②:261659950 群⑤:202807635 群⑦870801961 群⑧679858003
2、本站所有主题由该帖子作者发表,该帖子作者与运维网享有帖子相关版权
3、所有作品的著作权均归原作者享有,请您和我们一样尊重他人的著作权等合法权益。如果您对作品感到满意,请购买正版
4、禁止制作、复制、发布和传播具有反动、淫秽、色情、暴力、凶杀等内容的信息,一经发现立即删除。若您因此触犯法律,一切后果自负,我们对此不承担任何责任
5、所有资源均系网友上传或者通过网络收集,我们仅提供一个展示、介绍、观摩学习的平台,我们不对其内容的准确性、可靠性、正当性、安全性、合法性等负责,亦不承担任何法律责任
6、所有作品仅供您个人学习、研究或欣赏,不得用于商业或者其他用途,否则,一切后果均由您自己承担,我们对此不承担任何法律责任
7、如涉及侵犯版权等问题,请您及时通知我们,我们将立即采取措施予以解决
8、联系人Email:admin@iyunv.com 网址:www.yunweiku.com

所有资源均系网友上传或者通过网络收集,我们仅提供一个展示、介绍、观摩学习的平台,我们不对其承担任何法律责任,如涉及侵犯版权等问题,请您及时通知我们,我们将立即处理,联系人Email:kefu@iyunv.com,QQ:1061981298 本贴地址:https://www.yunweiku.com/thread-379123-1-1.html 上篇帖子: perl 把源目录下的文件拷贝到目标目录(带路径) 下篇帖子: 开始Perl
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

扫码加入运维网微信交流群X

扫码加入运维网微信交流群

扫描二维码加入运维网微信交流群,最新一手资源尽在官方微信交流群!快快加入我们吧...

扫描微信二维码查看详情

客服E-mail:kefu@iyunv.com 客服QQ:1061981298


QQ群⑦:运维网交流群⑦ QQ群⑧:运维网交流群⑧ k8s群:运维网kubernetes交流群


提醒:禁止发布任何违反国家法律、法规的言论与图片等内容;本站内容均来自个人观点与网络等信息,非本站认同之观点.


本站大部分资源是网友从网上搜集分享而来,其版权均归原作者及其网站所有,我们尊重他人的合法权益,如有内容侵犯您的合法权益,请及时与我们联系进行核实删除!



合作伙伴: 青云cloud

快速回复 返回顶部 返回列表