Add Perl DBI dump snippet