# on windows
set DBI_TRACE=DBD=x.log
run your perl program here
# on unix
export DBI_TRACE=DBD=x.log
run your perl program here