Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

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)

Replies are listed 'Best First'.
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?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1001260]
[1nickt]: james28909 You lost me a bit when you said "show me evolution from intelligence to ignorance". I guess we would have to define the terms, but as I look around at my species and how we are destroying our habitat ...
[james28909]: seems like a person cant even have a belief without hurting someones feelings. i never said my way is the only way. i just said i have pretty good scientific evidence, and then asked for opposing side to present evidence
[james28909]: was downvoted and left without a reply. go figure
[holli]: but then you DO give a fuck
[1nickt]: I don;t think beliefs should be down-voted, just behaviours.
[james28909]: im not quite how to explain it any better nick. you evolved from ignorance to intelligence. not the other way. the universe evolves from gas coulds and debris into planets stars and galaxies ect. it doesnt happen any other way. hence it has ....
[james28909]: some kind of logic behind it
[james28909]: and that is also anothe rpoint i made, i think it has to do with perception of the world around you. most people think of evolution on a human scale. why could life evolve on this planet? because this planet evolved in this solar system. and so on.
[holli]: here's something for you to watch, James. I think you will like it
[erix]: for the record: I have not downvoted anyone on that subthread that was my fault

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (14)
As of 2017-12-15 14:31 GMT
Find Nodes?
    Voting Booth?
    What programming language do you hate the most?

    Results (433 votes). Check out past polls.