use MeMmonitor1;  
my $m = MeMmonitor1->new($$);