I am reading the client info from a file and then looking for whether these processes exist for the client.
Server, Position, DV01r, Dfltr, JFlow, JServer, Order. I need to look for all these processes and report the ones not there as missing
I want to generate the report with the clientname and the process missing for the associated client usign Perl. I tried something like but it is not complete.
open(FH,"<clients.txt");
while($currLine = <FH>){
if ($currLine =~ /(client\d+)\s+(\S+)\s+(\S
+)\s+(\S+)
\s+(\S+)\s
+(\S+)\s+(
\S+)/){
open STDOUT,">data_bk.out" or die $!;
print "Checking for missing daemons for CLIENT:$1\n";
@args=("ssh","user\@$2","p
tree $1");
system(@args);
clients.txt
Client Host Instance Client Name Server Port Size
#-------------------------
----------
----------
----------
----------
----------
----------
----------
---
client12 app07 client12 Batch_34 10.100.155.210 12 S
client24 app07 client24 Batch_35 10.100.155.247 12 S
Start Free Trial