Oh most literate ones, can you tell me what's wrong?
You didn't quote your data values, so they appear to be column references.
Use placeholders instead, you'll be happier:
my $stmt = qq {INSERT INTO log (Nbr, Bdate, dtime)
VALUES (?,?,?)};
my $sth = $dbh->prepare( $stmt) || die "prepare: $stmt: $DBI::errstr";
$sth->execute($Nbr, $Bdate, $Dtime) || die "execute: $stmt: $DBI::errstr";
I get this error:
DBD::mysql::st execute failed: Unknown column '0928A' in 'field list' at test3.pl line 20.
execute: INSERT INTO log (Nbr, Bdate, dtime)
VALUES (123456, 10012003, 0928A): Unknown column '0928A in 'field list' at test3.pl line 20.
From this script:#use strict;
#use DBI qw(:sql_types);
use DBI;
#my $dbh;
my ($username, $password, $eamil, $Bdate, $AcctNbr, $Dtime);
my $username = 'jblowk';
my $password = 'abcdefg';
my $email = '[EMAIL PROTECTED]';
my $Bdate = '10012003';
my $Nbr = '123456';
my $Dtime = '0928A';
DBI->trace(2,"dbi.out"); # trace everything to
# dbi.out
my ($username, $password, $email);
#my ($dbh, $sth, $count);
$dbh = DBI->connect ("DBI:mysql:database=logbase;host=localhost; 'userid', 'password'") or die ("Can't connect to logbase");
my $stmt = qq {INSERT INTO log (Nbr, Bdate, dtime)
VALUES ($Nbr, $Bdate, $Dtime)};
my $sth = $dbh->prepare( $stmt) || die "prepare: $stmt: $DBI::errstr";
$sth->execute || die "execute: $stmt: $DBI::errstr";
$sth->finish ();
$dbh->disconnect ();
