This really isn't a perl solution (it is another way to do it), but you can always do something like

$dbh->do("SELECT NOW()");
[download]

That will even avoid problems if the clock on your sql machine and the clock on your server are off (even by a few seconds). Always go with what your datasource says, or use a time server to sync them up.

    --jb