Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
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 studying the Monastery: (7)
As of 2015-07-04 08:51 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (58 votes), past polls