The stupid question is the question not asked | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
Thanks all for your help
I have tried to implement what you guys have advised heres the code: #!c:/perl/bin/perl -wT use strict; use CGI; use CGI::Carp qw(fatalsToBrowser); use vars qw($Query $sth $dbh $Value @results @row); $Query = new CGI( ); use DBI; $dbh = DBI->connect('DBI:mysql:exelstock') or die "Cannot connect: " . $DBI::errstr; $Value = $Query->param('input'); $sth = $dbh->prepare("SELECT * FROM stock WHERE name=$Value"); $sth = $dbh->execute(); print "Content-type: text/html\n\n"; print "<HTML>\n"; print "<BODY>\n"; while (@results = $sth->fetchrow_array) { print "@row\n"; } $sth = $dbh->finish(); $dbh->disconnect(); print "</HTML>\n"; print "</BODY>\n"; Heres the error i get now...any ideas??? Can't locate object method "execute" via package "DBI::db" at c:\PROGRA~1\APACHE~1\apache\cgi-bin\project2.cgi line 23. In reply to Re^2: Cannot run a simple script?help im new
by ginda
|
|