Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Re^2: scope and undef

by Ryszard (Priest)
on Aug 28, 2007 at 13:19 UTC ( #635602=note: print w/ replies, xml ) Need Help??


in reply to Re: scope and undef
in thread scope and undef

cool bart, and thanks for the reply. I'll show a bit more detail into what i'm doing which hopefully will make what i see with Hook::LexWrap a little clearer to you.

my $app = Daemon->new(sleep => 60, mailLimit => 200); while (1) { $app->mailout(); print scalar(localtime)." Sleeping 300 seconds...\n"; sleep 10; }

is how the Daemon is called.

inside Daemon is a call to an object i've made myself to manage database connections, which you can find here, which is not particularly complicated, or fancy, just an abstraction to the DBI which i find handy. we'll call this DBhandler. on creating a Daemon object, DBhandler is put into $self->{dbo}

Since Daemon is persistant, i wrapped DESTROY in DBhandler, and told it to print Dumper($self).

This is where i see things that are contradictory. when i undef $self->{dbo} DESTROY is called in DBhandler, and i see $self being dumped to standard out, however upon checking the sessions in the database (ie via v$session) i see the number of connections from that user increasing!

oh, for the record, the delete, while not tested in this specific context, (ie with Hook::LexWrap), symptoms are the same.


Comment on Re^2: scope and undef
Select or Download Code
Replies are listed 'Best First'.
Re^3: scope and undef
by eric256 (Parson) on Aug 28, 2007 at 17:03 UTC

    In that code you do a foreach on a hashref. I don't think that destroy is actualy looping at all. Shouldn't it be foreach (keys %{$self->{_db_handle}})?

    sub DESTROY { my $self = shift; foreach ($self->{_db_handle}) { $self->{_db_handle}{$_}->disconnect; } }

    ___________
    Eric Hodges
      You're right there, its a bug in the code. I've actually fixed that in the one that i'm using (but have neglected to update the version here.. )

      well spotted! :-)

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (14)
As of 2015-07-30 15:54 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 (273 votes), past polls