Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re: help with references

by tobyink (Abbot)
on May 04, 2013 at 19:22 UTC ( #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


Comment on Re: help with references
Select or Download Code
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
Node Status?
node history
Node Type: note [id://1032075]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (14)
As of 2014-08-27 22:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (253 votes), past polls