Thread Nachweis über Serverkill (11 answers)
Opened by bianca at 2015-07-19 12:13

bianca
 2015-07-20 07:06
#181625 #181625
User since
2009-09-13
6978 Artikel
BenutzerIn

user image
Auf Nachfrage weiß ich jetzt, dass es wohl um CPU-Zeit geht, und nicht um Laufzeit des Scripts. time() hilft mir hier also nicht weiter.
Meine Google Suche ergab alles nur Treffer hinsichtlich der abgelaufenen Tageszeit aber keine CPU-Zeit.

Das Modul CPAN:Proc::ProcessTable brachte mich auch nicht so recht weiter, ich hab es kompiliert bekommen aber das beiliegende Testscript gibt einfach nur "geht los" aus, sonst nichts. Kann das ein Rechteproblem sein, dass ich auf einem shared Host keine Prozesse abfragen darf?
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#!/usr/bin/perl
use lib '/pfad_zu_meinen/perlmodule';
use Proc::ProcessTable;

$ref = new Proc::ProcessTable;
print "geht los\n";
foreach $proc (@{$ref->table}) {
  if(@ARGV) {
    next unless grep {$_ == $proc->{pid}} @ARGV;
  }

  print "--------------------------------\n";
  foreach $field ($ref->fields){
    print $field, ":  ", $proc->{$field}, "\n";
  }
}

Weiß jemand eine Möglichkeit, wie ein Perl Script seine eigene verbrauchte CPU-Zeit messen kann?
10 print "Hallo"
20 goto 10

View full thread Nachweis über Serverkill