Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re^2: Another "Can't use string as an ARRAY ref"

by bradcathey (Prior)
on Dec 05, 2016 at 14:54 UTC ( #1177218=note: print w/replies, xml ) Need Help??


in reply to Re: Another "Can't use string as an ARRAY ref"
in thread Another "Can't use string as an ARRAY ref"

Brilliant. I'm a visual learner and this was very helpful. Now to figure out a solution. More to come...

—Brad
"The important work of moving the world forward does not wait to be done by perfect men." George Eliot
  • Comment on Re^2: Another "Can't use string as an ARRAY ref"

Replies are listed 'Best First'.
Re^3: Another "Can't use string as an ARRAY ref"
by poj (Abbot) on Dec 05, 2016 at 14:58 UTC

    You might want to consider a simpler more SQL solution

    #!perl use strict; use DBI; use Data::Dumper; my $dbh = create_db(); my $sql = 'SELECT P.common_name,S.plant_size,S.unit,G.abbr FROM plants as P LEFT JOIN sizes as S ON S.plantid = P.id LEFT JOIN growers as G ON S.plantid = G.plantid AND S.plant_size = G.plant_size'; my $sth = $dbh->prepare($sql); $sth->execute(); my %hash=(); while (my @f = $sth->fetchrow_array){ $hash{$f[0]}{$f[1].$f[2]}{$f[3]} = 1 } print Dumper(\%hash);
    poj

      I appreciate the SQL approach. It's so much easier the building stuff in raw Perl. My SQL chops aren't what yours are, but I'm going to dissect this to see how it works. Thanks.

      —Brad
      "The important work of moving the world forward does not wait to be done by perfect men." George Eliot

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (3)
As of 2020-09-27 04:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    If at first I donít succeed, I Ö










    Results (142 votes). Check out past polls.

    Notices?