10-18-2013
Thanks RudiC and CaloM,
But seem like not work with pipes or with space on autorep -m "bogus|mirage"
autorep -m bogus
Machine Name Max Load Current Load Factor O/S Status
________________________________________________________________________________ __________ ____________ _______ ___________ ______
bogus --- --- 1.00 Sys Agent Missing
autorep -m "bogus|mirage"
CAUAJM_E_50111 Invalid Machine Name: bogus|mirage
autorep -m mirage
Machine Name Max Load Current Load Factor O/S Status
________________________________________________________________________________ __________ ____________ _______ ___________ ______
mirage 100 0 1.00 Sys Agent Online
SERVERS="server1 server2 server3"
while :
do for S in $SERVERS
do CM=$(autorep -m $S |
awk 'NR<3 {next}
/Offline|Missing|Unqualified/ {print $1, $NF; exit}
{exit 1}
') &&
{ echo "check the agent is $CM"
echo "mailx -s Warning $CM
abc@test.com"; } ||
sleep 10
done
done
Last edited by dotran; 10-18-2013 at 06:03 PM..
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
Hi,
I have a datafile which has the following data and it can have much more records. The data set is as follows:
ISA~00~ ~00~ ~ZZ~F159B ~ZZ~U1CAD ~051215~184
3~U~00200~000011432~0~P~<
GS~FA~TC11A~U1CAD~051215~1843~000011432~X~002002
ST~997~0001... (6 Replies)
Discussion started by: isingh786
6 Replies
2. Shell Programming and Scripting
Hi,
We have a text file which has the following data.
ISA~00~ ~00~ ~ZZ~VISTN ~ZZ~U1CAD ~051227~183
7~U~00200~000011258~0~P~<
GS~FA~EE05J~U1CAD~051227~1831~000011258~X~002002
ST~997~0001
AK1~SH~247
AK2~856~2470001
AK5~A
AK2~856~2470002
AK5~A... (3 Replies)
Discussion started by: isingh786
3 Replies
3. Shell Programming and Scripting
I searched through the forum and couldn't quite find what I was looking for. I have a script that looks for a process "DW" to be running. If it is not it will email a notice to an account. I would like to add the functionality to have it also email a seperate notice if there is more that one of... (1 Reply)
Discussion started by: heprox
1 Replies
4. UNIX for Dummies Questions & Answers
rshstatus=`rsh -n lilo /db/p2/oracle/names9208/restart_names.sh`
if $rshstatus <>0 then
errstatus=1
mailx -s "xirsol8dr" ordba@xxx.com >> $log_dr
else if errstatus=0
echo "status to xirsol8dr successful"
can anyone provide if this is t he correct way to do this or is there a better way? (1 Reply)
Discussion started by: bpm12
1 Replies
5. Shell Programming and Scripting
Hi,
I need help in writing unix script for checking space of some directories on the system and also send an email when it reaches the threshold limit.
I have written the followng code;
#!/bin/ksh
ADMIN="me@somewhere.com"
# set alert level 80% is default
THRESHOLD=80
df | grep -E... (5 Replies)
Discussion started by: jmathew99
5 Replies
6. Shell Programming and Scripting
Hello Team,
I have script which gives below output.
Server clustServer11 is in a STARTED state
Server clustServer12 is in a STOPPED state
Server clustServer21 is in a STOPPED state
I would like to prepare script which will grep stop word from the above output and send an email alert. (5 Replies)
Discussion started by: coolguyamy
5 Replies
7. Shell Programming and Scripting
Hello ,
I am trying to write a unix shell script to compare folder permission to say drwxr-x-wx and then send an email to my id in case the folders don't have the drwxr-x-wx permissions set for them .
I have been trying to come up with a script for few days now , pls help me:( (2 Replies)
Discussion started by: nairshar
2 Replies
8. Shell Programming and Scripting
I have written a bash script to to sort the data from logs i need some help in printing the outputs , i dont have much ideas in bah scripting.
Sample script
-----------------------
#!/bin/bash
a=`date | cut -d " " -f2,2,3`
cat /var/log/maillog |grep "$a" |grep -E -e 'deferred|bounced'... (9 Replies)
Discussion started by: unimaxlin
9 Replies
9. Shell Programming and Scripting
Hi,
I have few processes in the server continuous run few jobs, each of the process will generate a log file which detailing when its jobs are completed.
the logfile will has the name something like this, result1.log, result2.log, result3.log,.... result10.log, result11.log, result12.log.......... (8 Replies)
Discussion started by: khchong
8 Replies
10. Shell Programming and Scripting
Hi Guys,
Is there any way I can write a script that sends DISK SPACE USAGE STATUS via email once a week?
Thanks, (5 Replies)
Discussion started by: g4v1n
5 Replies
LEARN ABOUT CENTOS
module::load
Module::Load(3) User Contributed Perl Documentation Module::Load(3)
NAME
Module::Load - runtime require of both modules and files
SYNOPSIS
use Module::Load;
my $module = 'Data:Dumper';
load Data::Dumper; # loads that module
load 'Data::Dumper'; # ditto
load $module # tritto
my $script = 'some/script.pl'
load $script;
load 'some/script.pl'; # use quotes because of punctuations
load thing; # try 'thing' first, then 'thing.pm'
load CGI, ':standard' # like 'use CGI qw[:standard]'
DESCRIPTION
"load" eliminates the need to know whether you are trying to require either a file or a module.
If you consult "perldoc -f require" you will see that "require" will behave differently when given a bareword or a string.
In the case of a string, "require" assumes you are wanting to load a file. But in the case of a bareword, it assumes you mean a module.
This gives nasty overhead when you are trying to dynamically require modules at runtime, since you will need to change the module notation
("Acme::Comment") to a file notation fitting the particular platform you are on.
"load" eliminates the need for this overhead and will just DWYM.
Rules
"load" has the following rules to decide what it thinks you want:
o If the argument has any characters in it other than those matching "w", ":" or "'", it must be a file
o If the argument matches only "[w:']", it must be a module
o If the argument matches only "w", it could either be a module or a file. We will try to find "file.pm" first in @INC and if that
fails, we will try to find "file" in @INC. If both fail, we die with the respective error messages.
Caveats
Because of a bug in perl (#19213), at least in version 5.6.1, we have to hardcode the path separator for a require on Win32 to be "/", like
on Unix rather than the Win32 "". Otherwise perl will not read its own %INC accurately double load files if they are required again, or in
the worst case, core dump.
"Module::Load" cannot do implicit imports, only explicit imports. (in other words, you always have to specify explicitly what you wish to
import from a module, even if the functions are in that modules' @EXPORT)
ACKNOWLEDGEMENTS
Thanks to Jonas B. Nielsen for making explicit imports work.
BUG REPORTS
Please report bugs or other issues to <bug-module-load@rt.cpan.org<gt>.
AUTHOR
This module by Jos Boumans <kane@cpan.org>.
COPYRIGHT
This library is free software; you may redistribute and/or modify it under the same terms as Perl itself.
perl v5.16.3 2013-02-01 Module::Load(3)