Help for this page

Select Code to Download


  1. or download this
    my $sth = $dbh->prepare( "SELECT foo, bar, ni from some_table" );
    $sth->execute;
    ...
    while ($sth->fetch) {
        print "foo = $row{foo}, bar = $row{bar}, ni = $row{ni}\n";
    }