reasonablekeith has asked for the wisdom of the Perl Monks concerning the following question:
Sorry about the vague title and the short code example, but I'm not sure what's going on here and this seems to be the crux of the matter. I have the following chunk of code.
When run it produces the following output...print " -- executing: $component_name " . ($force_flag ? "(forced)" : + "") . " ($component) \n"; my $thr = threads->create( sub { my $passed_component = shift; print "STARTED: $component_name ($passed_component)\n"; $passed_component->execute($current_time); print "FINISHED: $component_name (at $current_time)\n"; }, $component );
For the life of me, I can't figure out why the two object refs are different.-- executing: MYCOMPONENT (Scheduler::Component=HASH(0x1dd4244)) STARTED: MYCOMPONENT (Scheduler::Component=HASH(0x21bca9c))
It's causing a problem because the Scheduler Component object set it's last run time at the end of the execute function, but I can't see that value as I seem to be looking at the wrong object! What I'm finding even harder to understand is that I've only created one Scheduler::Component object, so have no idea where this other reference has come from.
I did put a print of $self in the new() call for Scheduler::Component, which runs before the lines shown above, and shows the value for the component outside the thread.
Any help much appreciated.CREATED NEW COMPONENT (Scheduler::Component=HASH(0x1dd4244))
---
my name's not Keith, and I'm not reasonable.
my name's not Keith, and I'm not reasonable.
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Threads weirdness
by Corion (Patriarch) on Jul 06, 2009 at 14:12 UTC | |
by reasonablekeith (Deacon) on Jul 06, 2009 at 14:50 UTC | |
Re: Threads weirdness
by BioLion (Curate) on Jul 06, 2009 at 15:02 UTC |
Back to
Seekers of Perl Wisdom