Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much

(wil) Re: Passing a hash between subs

by wil (Priest)
on Jan 30, 2003 at 16:42 UTC ( #231371=note: print w/replies, xml ) Need Help??

in reply to Re: Passing a hash between subs
in thread Passing a hash between subs

That $ref is coming from data extracted from the database via:
while (my $ref = $sth->fetchrow_hashref()) { ...

- wil

Replies are listed 'Best First'.
Re: (wil) Re: Passing a hash between subs
by broquaint (Abbot) on Jan 30, 2003 at 16:54 UTC
    Aha! The problem there is that the $ref lives within the lexical scope of the while loop in the bar() sub. So once the while loop exits, $ref is no longer in scope. Even if it were declared about the while loop it would fall out of scope when bar() exits. What you probably intended was something like this
    sub foo { ... ## get $ref back from bar() my($ref, %locations) = &bar($dbh); ... my $location_text = $locations{$ref->{'location'}}; } sub bar { ... my $ref; while ($ref = $sth->fetchrow_hashref()) { my $id = $ref->{'id'}; my $location = $ref->{'location'}; $locations{$id} = $location; } $sth->finish; ## return $ref back to caller return $ref, %locations; }
    However now $ref only contains the hash ref from the last iteration of the while loop, or is that the desired result?


Log In?

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

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (5)
As of 2022-12-03 19:30 GMT
Find Nodes?
    Voting Booth?

    No recent polls found