Speicherverbrauch anzeigen

17/09/2009 - 13:11 von Helmut Schneider | Report spam
Hi,

gibt es eine Funktion, die mir den Speicherverbauch des laufenden Scriptes
anzeigt?

Danke und Gruß, Helmut

No Swen today, my love has gone away
My mailbox stands for lorn, a symbol of the dawn
 

Lesen sie die antworten

#1 Peter J. Holzer
17/09/2009 - 20:39 | Warnen spam
On 2009-09-17 11:11, Helmut Schneider wrote:
gibt es eine Funktion, die mir den Speicherverbauch des laufenden Scriptes
anzeigt?



Das ist natürlich sehr betriebssystemabhàngig. Für Linux verwende ich
folgende Funktion:


sub getvmsize {
# from linux/Documentation/filesystems/proc.txt
# size total program size··············
# resident size of memory portions·········
# shared number of pages that are shared·
# trs number of pages that are 'code'·
# drs number of pages of data/stack···
# lrs number of pages of library······
# dt number of dirty pages···········
open (my $fh, '<', "/proc/$$/statm");
my $line = <$fh>;
my ($size, $resident, $shared, $trs, $drs, $lrs, $dt) = split(/\s+/, $line);
return $size * 4096; # XXX
}

Auf CPAN finde ich auf die Schnelle nix.

hp

Ähnliche fragen