How can I show the query time in Perl, DBI?

Question

I use Perl and DBI to manage my MySQL tables, querys, etc. How can I show the running time of a query?

If I do a SELECT in the console, the result will be like this:

Answer 1

DBI#Profile, DBI::Profile, DBI::ProfileData, DBI::ProfileDumper, dbiprof