This script called prof_test.pl:
use DBI;
my $dbh = DBI->connect("dbi:ExampleP:", '', '', { });
my $sth = $dbh->prepare("SELECT * FROM ?");
$sth->execute(".");
$sth->finish();
Produces this output with DBI_PROFILE set to 2:
$ DBI_PROFILE=2 perl prof_test.pl
DBI::Profile: 0.001105 seconds 0.13% (10 method calls) prof_test.pl
'' =>
0.000382s / 7 = 0.000055s avg (first 0.000010s, min 0.000010s, max 0.000235s)
'SELECT * FROM ?' =>
0.000723s / 3 = 0.000241s avg (first 0.000385s, min 0.000060s, max 0.000385s)
I don't think this is right. Where did the 10 method calls come from? I
only count 4 in the script. According to the DBI::Profile docs, profiling
is supposed to hide the effects of DBI calling back into itself, so it
should only show 3 calls. Or am I missing something here?
-sam
