Help for this page

Select Code to Download


  1. or download this
        my $passed_sql = shift;
        my $sql = "SELECT COUNT(*) etc blah blah";
    ...
        print STDERR "\nTrying[3] interpolated: $passed_sql\n";
        die if $sql ne $passed_sql; # Might as well ...
        my ($total_cols) = $dbh->selectrow_array($sql) or die($dbh->errstr
    +);