use Log::Report::DBIC::Profiler; $schema->storage->debugobj(Log::Report::DBIC::Profiler->new); $schema->storage->debug(1); # And maybe (if no exceptions expected from DBIC) $schema->exception_action(sub { panic @_ }); # Log to syslog use Log::Report; dispatcher SYSLOG => 'myapp' , identity => 'myapp' , facility => 'local0' , flags => "pid ndelay nowait" , mode => 'DEBUG';
This profile will log DBIx::Class queries via Log::Report to a selected back-end (via a dispatcher, see Log::Report::Dispatcher)