Select Code to Download

#!/usr/bin/perl -w

...

exit;

PTIME: "2014020918:06:03"
SEPOCH: "1391987163"
DATE: "2014020918:06:03"
NDTIME: "2014-02-09 18:06:03"

    $query = undef; $sth = undef; $ect = 0; @row = (); $macidx = undef
+;
...

    if($debug == 1) { print "MACIDX: \"$macidx\" L: \"" . __LINE__ . "
+\"\n"; }

    $query = undef; $sth = undef; $ect = 0; @row = (); $dbok = 1;
    $query = "SELECT cllseen, clmacidx FROM tblmac where clmac = ?";
...

      }