set DBI_TRACE=DBD=x.log
perl myscript.pl