Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

fetchrow_hashref Confusion

by Angel (Friar)
on Jun 15, 2002 at 17:39 UTC ( #174853=perlquestion: print w/replies, xml ) Need Help??
Angel has asked for the wisdom of the Perl Monks concerning the following question:

How to I get at the hash it's self and not the reference? I need the hash that it returns to get at the data for a mail merge project?

Replies are listed 'Best First'.
(jeffa) Re: fetchrow_hashref Confusion
by jeffa (Bishop) on Jun 15, 2002 at 18:05 UTC
    By de-referencing:
    my %hash = %{$sth->fetchrow_hashref()};
    But you don't have to do that ... you could do something like:
    while (my $row = $sth->fetchrow_hashref()) { my $mail = $row->{mail}; print "$mail\n"; }
    just as easily IMHO.


    (the triplet paradiddle with high-hat)
Re: fetchrow_hashref Confusion
by runrig (Abbot) on Jun 15, 2002 at 18:18 UTC
    How to I get at the hash it's self and not the reference?

    The same way you work with any other hash ref:

    %hash = %$hashref; # or to get at a specific value: $value = $hashref->{key}; # or you can use fetchrow_arrayref: my @names = @{$sth->{NAME_lc}}; my %hash; while (my $values = $sth->fetchrow_arrayref) { @hash{@names} = @$values; }
Re: fetchrow_hashref Confusion
by VSarkiss (Monsignor) on Jun 16, 2002 at 00:09 UTC

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://174853]
Approved by virtualsue
[1nickt]: hippo You suggest this as a transport agent for Email::Sender, or ...? Just for the record Email::Sender:: Transport::SMTP has SSL/TLS support built-in (and some shiny RJBS extras like "partial success" ...)
[Perl300]: ok

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (8)
As of 2017-10-17 16:13 GMT
Find Nodes?
    Voting Booth?
    My fridge is mostly full of:

    Results (234 votes). Check out past polls.