my $start = time(); $dbh->do(...); my $exec_time = time() - $start;