i just made a simple script to test this out and..
#!/usr/bin/perl use Proc::ProcessTable; sub memory_usage { my $t = new Proc::ProcessTable; foreach my $got ( @{$t->table} ) { next if not $got->pid eq $$; return $got->size; } } print 'memory: '. memory_usage()/1024/1024 ."\n";
Running it results in:
$ ./test.pl memory: 6.26953125
how normal is that?
In reply to Re: Find memory usage of perl program
by Anonymous Monk
in thread Find memory usage of perl program
by toma
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |