Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
system("ps vp $$");
undef $hr;
system("ps vp $$");
  2. or download this
    $ perl memory.pl 10000 1000
10000, 1000
...
14105 pts/0    S+     0:00      0     3 77552 61684  1.5 perl memory.p
+l 100 100000
  PID TTY      STAT   TIME  MAJFL   TRS   DRS   RSS %MEM COMMAND
14105 pts/0    R+     0:00      0     3 18752  2888  0.0 perl memory.p
+l 100 100000