Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Re: push(@ary,\%hash)

by DrManhattan (Chaplain)
on Oct 23, 2001 at 21:48 UTC ( [id://120850]=note: print w/replies, xml ) Need Help??


in reply to push(@ary,\%hash)

I'm not entirely sure what you're trying to accomplish, but I'll give it a shot. :)
my $row = $dbh->selectall_arrayref(...)
$row will be a reference to an array of arrayrefs. E.g. ...
$row->[0]->[0]
... is the first column of the first row of output. If you want an array of hashrefs, use selectall_hashref():
my $row = $dhb->selectall_hashref(...)
$row->[0]->{'g_afsluttet'} is the column named 'g_afsluttet' in the first row of output. Now, if I understand your question right, you want to modify one of the columns of your output. You want to replace the value of the column named 'g_afsluttet' with con_date(<value>) for every row in the output? If that's the case, you can do it like this:
my $rows = $dbh->selectall_hashref(...); ... foreach my $hashref (@$rows) { $hashref->{'g_afsluttet'} = con_date($hashref->{'g_afsluttet'}); } ... $tmpl->param(LOOP => $rows);

-Matt

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others perusing the Monastery: (3)
As of 2024-04-20 02:14 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found