Page 1 of 1

Serverload mit Perl abfragen

Posted: 2004-10-18 10:37
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".

Re: Serverload mit Perl abfragen

Posted: 2004-10-18 12:34
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

Re: Serverload mit Perl abfragen

Posted: 2004-10-21 14:03
by rob k
ALternativ kannst Du auch "/proc/loadavg" auslesen ...