#!/usr/bin/perl # $mysqladmin status 의 결과물 # Uptime: 348365 Threads: 6 Questions: 144988 \ # Slow queries: 1 Opens: 286 Flush tables: 1 \ # Open tables: 64 Queries per second avg: 0.416 $argnum = $#ARGV+1; if ($argnum < 3 ) { print "Usage : $0 [host] [id] [password]\n"; exit(1); } my $host = $ARGV[0]; my $user = $ARGV[1]; my $pass = $ARGV[2]; open(SQL, "mysqladmin -h $host -u $user --password=$pass stat|") || die "Mysql Status FAILURE\n"; @msg = ("uptime=", "threads=", "questions=", "slowquery=", "opens=", "flushtable=", "opentables=", "qps="); $msg = ""; $rtvmsg = "Mysql Status OK|"; while($line = <SQL>) { @_ = split /: +/,$line; } $msg = $rtvmsg; for (my $i = 1; $i <= $#_-1; $i++) { @val = split / +/,$_[$i]; $msg .= $msg[$i].$val[0]." "; } print $msg,"\n"; exit(0);
Copyrights © - Joinc, All Rights Reserved. Inherited From - Yundream Rebranded By - Joonphil
소개
코드
관련글
Recent Posts
Archive Posts
Tags