Re: Storing object references during creation of ->new object

Not this:

$server_objects{$options{'serial'}} = \$self;
[download]

This instead:

$server_objects{$options{'serial'}} = $self;
[download]

perl -E'sub Monkey::do{say$_,for@_,do{($monkey=[caller(0)]->[3])=~s{::}{ }and$monkey}}"Monkey say"->Monkey::do'

Comment on Re: Storing object references during creation of ->new object Select or Download Code

Replies are listed 'Best First'.
Re^2: Storing object references during creation of ->new object by perldarren (Novice) on Aug 05, 2012 at 15:34 UTC
Thank you for the quick response. When I drop the \ I get: `Can't call method "logout" on unblessed reference` [download]	[reply] [d/l]
Re^3: Storing object references during creation of ->new object by perldarren (Novice) on Aug 05, 2012 at 15:43 UTC
Here is the entire sub new: `sub new { my $class = shift; my %options = @_; my $self = { _serial => $options{'serial'}, _log => $options{'log'}, _horcm => $options{'horcm'}, _does_get_cmd_status => $options{'does_get_cmd_status'}, }; bless $self, $class; $array_objects{$options{'serial'}} = $self; return $self; }` [download]	[reply] [d/l]
Re^4: Storing object references during creation of ->new object by perldarren (Novice) on Aug 05, 2012 at 16:09 UTC
Hold on ! tobyink, you're right - my issue is solved. Many thanks!	[reply]