Select Code to Download

All perl-5.18.2 (i686-linux-64int-ld)

...
where 0 = 1   0.00382  0.00001  0.00436
   no where   0.00378  0.00001  0.00448
where 0 = 1   0.00377  0.00001  0.00449

use 5.16.2;
use warnings;
...

    $dbh->do ("drop table $tbl");
    }