I have a mysql database on our Web server. If I run mysqladmin (via telnet) I can query the database and everything works fine. I run this exact SELECT statement and it returns 189 records.

As I try to do this in Perl, I come across a statement I don't understand.

Here's the code and error:

#!/usr/bin/perl -w
     
    use strict;
    use DBI;
    use CGI::Carp qw(fatalsToBrowser);
    use CGI qw (:standard);
    print "Content-type: text/html\n\n";
    

     my $dbh = DBI->connect(qq{DBI:mysql:f_dir=/usr/local//subscriptio
+ns}, {RaiseError => 1} );

     my $sth = $dbh->prepare( q{SELECT email FROM contacts WHERE state
+ = ?} );

     my $rc = $sth->execute('OH');

     print "Query will return $sth->{NUM_OF_FIELDS} fields.\n\n";
     
     while (my @result = $sth->fetchrow_array()) {
        print "@result\n";
        }
        

     # check for problems which may have terminated the fetch early
     die $sth->errstr if $sth->err;
     
     $dbh->disconnect;

[download]

fetch() without execute() at /usr/local/cgi-bin/DBI_mysql_01.pl line 20.(the line that checks for problems which may have terminated the fetch early).

I have DBI installed. DBD::mysql installed.

I can't find this problem in any docs. Can someone please give it a glance and tell me the obvious?

Super thanks -
peppiv

"Put zee candle back!"

In reply to DBI::mysql fetch() without execute() PROBLEM by peppiv

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.