or download this
my $dbh;
$dbh = CreateObject OLE "ADODB.Connection" or die "Can't create connec
+tion to DataBase: $!" unless $dbh; $dbh->Open("Driver={Microsoft Acc
+ess Driver (*.mdb)};DBQ=../_private/db1.mdb");
my $rs = CreateObject OLE "ADODB.Recordset" or die "can not create rec
+ordset";
my $sql = "INSERT INTO y (formfield,formemail,formpass) VALUES ($formf
+ield,$formemail,$formpass)";
$rs = $dbh->Execute( $sql );