my $passed_sql = shift;
    my $sql = "SELECT COUNT(*) etc blah blah";
    print STDERR "Trying[1] to print parameter alone: "
    print STDERR $passed_sql;
    print STDERR "\nTrying[2] list print: ", $passed_sql;
    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);