Help for this page
if(length $string>256){ # remove trailing spaces ... $string = substr($string,0,256); } }
$dbh->do( "CREATE TABLE $table (" ... #$sth->bind_param(2,"$fld2",DBI::SQL_VARCHAR); print $fld2; #prints 0002 $sth->execute($fld1,$fld2,$fld3);
$sql = "INSERT INTO $table VALUES('$fld1','$fld2','$fld3')"; #print $sql . "\n"; $dbh->do($sql);
#! /usr/lcl/bin/perl use DBI; ... sub _forminfo { ... }
www.com | www.net | www.org
No recent polls found