Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine
 
PerlMonks  

Threads / Refcounts

by Bauldric (Novice)
on Oct 28, 2012 at 09:42 UTC ( #1001260=note: print w/ replies, xml ) Need Help??


in reply to Re: Memory Leak Package
in thread Memory Leak Package

Good morning, my holy reverend

For my following little program I did no use threads

use strict; use warnings; use CProcess; # own class use B; CProcess->PrintProcessInfo("perl.exe");

# Output: Process-ID 12280: Memory 13716 KB (+13716 KB) - Peak 13716 KB - Threads 3 - Handles 115 (perl)

The only packages I use are:

use strict; use warnings; use Carp; use FileHandle; use Sys::Hostname; use Cwd; use Win32::Registry; use IO::Select; require Win32::Console; require Win32::Clipboard; require Win32::PerfLib; require Win32::OLE; require Tk::MainWindow; require 5.000; require Exporter;
perhaps one of them uses threads.

To count refcounts I use

require B; my $anon = []; my $otherref = $anon; my $refcount = B::svref_2object($anon)->REFCNT(); # => 2

which counts the referents of the referenced object (and not only of the variable itself like Devel::Peek)


Comment on Threads / Refcounts
Select or Download Code
Re: Threads / Refcounts
by BrowserUk (Pope) on Oct 28, 2012 at 09:57 UTC
    For my little program

    Is this the 400,000 line/100 package "small program"? :)

    I did not use threads

    I got the notion that you were using threads from your post:

    ID 7772: Memory 34200 KB ( 34200 KB) - Peak 34940 KB - Threads 3 - Han +dles 124 (perl) .......................................................^^^^^^^^^
    The only packages I use are: ... perhaps one of them uses threads.

    Hm. None of those use threads, (as in Perl Ithreads), that I am aware of.

    But Win32::OLE might well use -- or cause to be used -- kernel threads.

    But more interesting, is that none of those is XML::Simple as is the subject of How can I free the memory of a XML::Simple-Object?


    With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.

    RIP Neil Armstrong

Re: Threads / Refcounts
by bulk88 (Priest) on Oct 28, 2012 at 18:49 UTC
    Considered using VMMap on your perl process?

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1001260]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (7)
As of 2014-07-26 19:25 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (178 votes), past polls