[ale] multiple query in DBD::mysql

[Geoffrey]

You didn't bind your vars.  Further, from 'Programming the Perl DBI':

'Because of the extra work fetch_hashref and Perl have to perform, this 
attribute is not as efficient as fetchrow_arrayref or fetchrow_array'

Christopher Fowler wrote:
> 
> I'm trying to grab data from two tables and print
> it out.  I'm generating a report.
> 
> 
>      22 # Now retrieve data from the table.
>      23 my $sth = $dbh->prepare("SELECT * FROM mantis_bug_table");
>      24 $sth->execute();
>      25 print "Number  Status       Summary\r\n";
>      26 print "------- ------       -------------------------------------------------------\r\n";
>      27 while (my $ref = $sth->fetchrow_hashref()) {
>      28         my $status;
>      29         if($ref->{status} == 10 ) {
>      30             $status = "new";
>      31         } elsif ($ref->{status} == 20 ) {
>      32             $status = "feedback";
>      33         } elsif ($ref->{status} == 30 ) {
>      34             $status = "acknowledged";
>      35         } elsif ($ref->{status} == 40) {
>      36             $status = "confirmed";
>      37         } elsif ($ref->{status} == 50) {
>      38             $status = "assigned";
>      39         } elsif ($ref->{status} == 80 ) {
>      40             $status = "resolved";
>      41         } elsif ($ref->{status} == 90) {
>      42             $status = "closed";
>      43         }
>      44 
>      45         my $dQuery = "SELECT * from mantis_bug_text_table where id like $ref->{id}";
>      46         my $desc = $dbh->prepare($dQuery);
>      47         $desc->execute();
>      48 
>      49         printf("%-7s %-12s %-50s\r\n", $ref->{id}, $status, $ref->{summary});
>      50         while (my $r2 = $sth->fetchrow_hashref()) {
>      51             printf("$r2->{description}\r\n");
>      52         }
>      53 }
>      54 $sth->finish();
> 
> 
> Error:
> DBD::mysql::st fetchrow_hashref failed: fetch() without execute() at ./list.pl line 27.
> DBD::mysql::st fetchrow_hashref failed: fetch() without execute() at ./list.pl line 27.
> 
> What is the best way to do this?
> 
> Thanks,
> Chris
> _______________________________________________
> Ale mailing list
> Ale at ale.org
> http://www.ale.org/mailman/listinfo/ale
> 
> 

-- 
Until later: Geoffrey		esoteric at 3times25.net

The latest, most widespread virus?  Microsoft end user agreement.
Think about it...

_______________________________________________
Ale mailing list
Ale at ale.org
http://www.ale.org/mailman/listinfo/ale