It has been a rough Monday. I am dissecting a script written (what seems like) many eons ago.

I figured out how to test for Open database handles.
1.) using DBI::ODBC  if ($dbh->{state} == 1){it's open}
2.) using WIN32::ODBC  if ($db->Connection > 0){it's open}

The filehandles were eluding me at that point.

fmogavero