The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Catalyst::Plugin::DBIC::Proflier - Profile time query took with DBIC or DBIC::Schema in your application.

VERSION

Version 0.02

SYNOPSIS

  # In your application class MyApp.pm
  # Load Catalyst::Plugin::DBIC::Profiler. Done.
  use Catalyst qw/
      Foo::Plugin
      Bar::Plugin
      Kore::Plugin
      Sore::Plugin
      ...
      DBIC::Profiler    # Load this plugin.
      ...
  /;

DESCRIPTION

As indicated above load this plugin, then run your application.This plugin output your SQL statment, time your query took and number of times your query executed just like below.

  [debug] SQL[23]
  SELECT me.id, me.create_on, me.modify_on, me.modify_by, me.password, me.master_group_id, me.email, me.login_on FROM master_user me WHERE ( email = ? )
  Bind Values : ( 'precure@example.com' )
  [debug] -->Query Time : 0.003177

  # In case of running txn_begin.
  [debug] BEGIN WORK

  # In case of running txn_rollback.
  [debug] RALLBACK

  # In case of running txn_commit
  [debug] COMMIT

  # When you use transaction(txn_begin, txn_rollback, txn_commit), set MODEL_NAME in you configuration.
  # If you have MyApp::Model::DBIC::MyApp
  DBIC::Profiler:
    MODEL_NAME: DBIC::MyApp

AUTHOR

Tomoyuki SAWA, <travail at cabane.no-ip.org>

BUGS

Please report any bugs or feature requests to bug-catalyst-plugin-dbic-profiler at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Catalyst-Plugin-DBIC-Profiler. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

    perldoc Catalyst::Plugin::DBIC::Profiler

You can also look for information at:

ACKNOWLEDGEMENTS

COPYRIGHT & LICENSE

Copyright (C) 2006 by Tomoyuki SAWA

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.2 or, at your option, any later version of Perl 5 you may have available.