Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: help with references

by tobyink (Canon)
on May 04, 2013 at 19:22 UTC ( [id://1032075]=note: print w/replies, xml ) Need Help??


in reply to help with references

$h{2} isn't a reference to $h{1}. $h{2} is a reference to the same array that $h{1} refers to.

I think you probably want:

for my $i ( 1 .. 2 ) { my @new = @a; # copy of @a $h{"$i"} = \@new; # reference the copy }

Or (more concise way of saying the same thing)...

for my $i ( 1 .. 2 ) { $h{"$i"} = [@a]; }
package Cow { use Moo; has name => (is => 'lazy', default => sub { 'Mooington' }) } say Cow->new->name

Replies are listed 'Best First'.
Re^2: help with references
by dw_perlmonks (Novice) on May 04, 2013 at 20:09 UTC
    tobyink, thanks for replying. But what I was expecting is different. I've updated my post with more info.

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others examining the Monastery: (5)
As of 2024-04-23 17:29 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found