| CatalystX-Profile documentation | Contained in the CatalystX-Profile distribution. |
CatalystX::Profile::Controller::ControlProfiling - Control profiling within your application
version 0.01
Some actions you can use to control profiling
Stop and finish profiling, and write all the output. This can be a bit slow while the profiling data is written, but that's normal.
Oliver Charles <oliver.g.charles@googlemail.com>
This software is copyright (c) 2010 by Oliver Charles.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
| CatalystX-Profile documentation | Contained in the CatalystX-Profile distribution. |
# ABSTRACT: Control profiling within your application package CatalystX::Profile::Controller::ControlProfiling; our $VERSION = '0.01'; use Moose; use namespace::autoclean; BEGIN { extends 'Catalyst::Controller' } use Devel::NYTProf; sub stop_profiling : Local { my ($self, $c) = @_; DB::finish_profile(); $c->log->debug('Profiling has now been disabled'); $c->body('Profiling finished'); } 1; __END__