Thread Anfänger IF-Problem (8 answers)
Opened by keeperin at 2007-12-04 17:27

keeperin
 2007-12-04 17:27
#103443 #103443
User since
2007-12-04
2 Artikel
BenutzerIn
[default_avatar]
Hallo zusammen,
ich kann leider noch kein Perl, aber habe hier ein Script was ich ein wenig verändern muss.
Für euch ist das wahrscheinlich ziemlich lächerlich *g* Aber ich hoffe ihr könnt mir helfen :-D

Also das Script funktioniert gut, jetzt soll aber folgende Änderung gemacht werden.

Mal als pseudo-Programmiersprach dargestellt ;-)

------------
teste runlevel

if runlevel == "4 3"
AUSGABE = RUNLEVEL 3
# nichts weiter machen

if runlevel = "3 4"
führe script aus

Hier noch das schript
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
#!/usr/bin/perl

use strict;
use warnings;
use Data::Dumper;
use Getopt::Long;
# use lib "/usr/lib/nagios/plugins" ;
use lib "/app/nrpe" ;
use utils qw($TIMEOUT %ERRORS );
# print "Script started\n";
my $PATH = "/app/nrpe/";
$ENV{'LD_LIBRARY_PATH'} = $PATH;

my $warn = "CRITICAL";

my(@CMD,$line,$pag,$info,$paging,$stat,$command,$status,$message);

GetOptions (
'command|m=s'=>\$command
);

my($p) = shift;

$line = ` $PATH/check_disk -w 2 -c 1 -p $p |grep 'DISK'`;

$info = "";

$stat = "";
if ( $line =~ /^DISK CRI/ ) {
$status = "CRITICAL";
}

else { $status = "OK"; }

chomp($stat);

$message = ("NFS MOUNT is $status");
print "$status - $message\n";
exit $ERRORS{$status};


EDIT: ist ein Linux System ;-) Deshalb die runlevel abfrage :-)

So dann danke schön :-)

LG Keeperin

View full thread Anfänger IF-Problem