or download this
$dbh = DBI->connect('DBI:mysql:dataflex') or die "Couldn't connect to
+database: " . DBI->errstr;
$sql = "SELECT * FROM dataflex where attorney = ? and issue = ?";
$sth = $dbh->prepare($sql) or die "preparing: ",$dbh->errstr;
$sth->execute($INPUT{'attorney'},$INPUT{'issue'}) or die "executing: "
+, $dbh->errstr;