Serverload mit Perl abfragen

Bash, Shell, PHP, Python, Perl, CGI
adams
Posts: 4
Joined: 2004-08-16 11:40

Serverload mit Perl abfragen

Post by adams »

Hallo

Wie kann ich die Loadwerte, die man mit "top" angezeigt bekommen, via Perl ermitteln?

Hintergrund:
Ich möchte den Aufruf eines sehr rechenintensivem cgi-Programms mit vielen Datenbankabfragen ggf. blockieren, wenn der augenblicke Serverload zu hoch ist. Bei einigen Foren gibt es ja solche "Begrenzer".
pickel
Posts: 48
Joined: 2002-05-30 17:47

Re: Serverload mit Perl abfragen

Post by pickel »

führ einfach folgenden befehl aus:

Code: Select all

uptime | awk '{print $9}' | sed -e 's/,//'
und du hast den load der letzten minute..
für die letzten 5 Minuten nehme anstatt $9 einfach $10 und anstatt 5 minuten lieber 15 minuten nehm $11
rob k
Posts: 16
Joined: 2004-10-20 12:56
Location: Dresden

Re: Serverload mit Perl abfragen

Post by rob k »

ALternativ kannst Du auch "/proc/loadavg" auslesen ...