dear gurus
can someone please explain this anomaly?
i have this code:
#!/usr/bin/perl
use CGI;
use DBI;
use webdb5;
$query = new CGI;
print "Content-type: text/html\n\n";
&dispinstructormenu;
exit;
#################################
sub dispinstructormenu {
$dbh = webdb5::connect_mdcLinux;
$tuery = qq(SELECT tr_roll_id from tr_roll WHERE tr_roll_studentID = "T2");
$sth = $dbh->prepare($tuery);
$sth->execute() or webdb5::dberr_trap("cant query");
$sth->bind_columns(\$f1);
$sth->fetch();
$sth->finish();
$dbh->disconnect;
print "$f1";
}
====
works fine on one LAMP environment. but i transfered the code to another
system with same version of perl & mysql, and the bind_columns hangs!!
adding a second column - gets it to work:
...
$tuery = qq(SELECT tr_roll_id, tr_roll_name from tr_roll WHERE
tr_roll_studentID = "T2");
$sth = $dbh->prepare($tuery);
$sth->execute() or webdb5::dberr_trap("cant query");
$sth->bind_columns(\$f1, \$f2);
...
namely, on this system cant bind just one column with good syntax - it hangs.
i tried bind_col(1, \$f1); and got it to work - but i dont want to
change a gazillion lines of code for this [EMAIL PROTECTED]
any reason why and solutions??
thank you so much ...
--
Mario R. Sanchez, Ph.D.
High Performance Database Research Center
NASA Regional Application Center
Florida International University
U.S.A.
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
