perl := yuck java := good > -----Original Message----- > From: Thomas Eibner [SMTP:thomas at stderr.net] > Sent: Thursday, November 08, 2001 8:44 PM > To: tclug-list at mn-linux.org > Subject: Re: Learning CGI Database Wizardry (Was Re: [TCLUG] > PostgreSQL Advocacy (was Re: <TROLL> (was ...))) > > On Thu, Nov 08, 2001 at 07:26:18PM -0600, Mark Browne wrote: > > I am also trying to get web <-->database thing going. > > So far I have got the web form <--->Perl part working; Yippie for CGI. > > The cgi-lib code makes this falling-off-a-log simple. > > > > Now for the Perl<--->database part. > > I am actually working on it tonight. > > It seem that DBI is the way to go. > > If I understand this correctly it works the same for most databases. > > I downloaded it last night and am working through the documentation. > > > > A little working sample code would be nice. > > use DBI; > > my $dbh = DBI->connect("dbi:mysql:<dbname>","username","password") or die > $DBI::errstr; > > my $sth = $dbh->prepare("select col1,col2 from table where col3 = ?"); > > $sth->execute('col3val'); > > while (my ($col1, $col2) = $sth->fetchrow_array()) { > print "$col1: $col2\n"; > } > > $sth->finish(); > > $dbh->disconnect(); > > hope that helps! > > -- > Thomas Eibner <http://thomas.eibner.dk/> DnsZone <http://dnszone.org/> > mod_pointer <http://stderr.net/mod_pointer> > > _______________________________________________ > Twin Cities Linux Users Group Mailing List - Minneapolis/St. Paul, > Minnesota > http://www.mn-linux.org > tclug-list at mn-linux.org > https://mailman.mn-linux.org/mailman/listinfo/tclug-list