| ID | WORD | FLAG | LWORD
| dc5943 | bears | 0 | bears
| mu0286 | best summer tunes | 0 | bestsummertunes
| mu0286 | bestsummertunes | 1 |
| muz334 | chk chk chk | 0 | chkchkchk
| ofn00861 | chuck e cheese.com | 0 | chuckecheesecom
| dcz013 | dc restaurants | 0 | dcrestaurants
| dcz0013 | dc restaurants | 0 | dcrestaurants
| dcz013 | dc resturants | 1 |
| dcz0013 | dc resturants | 1 |
| dcz013 | dc american dining | 0 | dcamericandining
| dcz0003 | elmira wv | 0 | elmirawv
| dc0160 | elmira, c. a. | 1 |
| tw0056 | elmira, n. y. | 1 |
####
| ID | WORD | FLAG | LWORD
| wq12351y059 | hawkinschemical | 1 |
| wq12366y059 | healtheon corp. | 1 |
| wq12367y059 | healthgatedata. | 1 |
| wq12382y059 | helixtechnology | 1 |
| wq12385y059 | helpathome,inc. | 1 |
| wq12390y059 | henryschein,inc | 1 |
| wq12390y059 | henryscheininc. | 1 |
| wq12397y059 | hermanmillerinc | 1 |
| wq12404y059 | hffinancialcorp | 1 |
| wq12409y059 | hickorytechcorp | 1 |
####
$DSN = 'DBI:ODBC:SearchWords';
$USER= '';
$PASS= 'password';
$DBH = DBI->connect( $DSN, $USER, $USER ) || die "Connect Error: $DBI::errstr\n";
my $SQL = "SELECT * FROM [Production Words]";
my $sth = $DBH->prepare($SQL);
$sth->execute || die "Could not execute SQL statement ... maybe invalid?\n$!";
$sth->bind_columns(\$aid,\$wd,\$we,\$df,\$lw,\$sw);
while($sth->fetch()) {
print "$aid\t$wd\t$we\t$df\t$lw\t$sw\n";
}
$DBH->disconnect();