Help for this page

Select Code to Download


  1. or download this
            
            my $count1 =  Devel::Leak::NoteSV(my $handle);
    ...
            print "Count1 = '",$count1,"'\n";
            print "Count2 = '",$count2,"'\n";
            print "Diff = '",$count2-$count1,"'\n";
    
  2. or download this
    
    new 0x9d741e8 : 
    ...
    Count1 = '594970'
    Count2 = '594974'
    Diff = '4'