view release on metacpan or  search on metacpan

lib/Catalyst/Plugin/MemoryUsage.pm  view on Meta::CPAN

        return $c;
    };

    after finalize => sub {
        return unless $_memory_usage_report;

        my $c = shift;
        $c->log->debug(
            sprintf(qq{[%s] memory usage of request "%s" from "%s"\n},
                [split m{::}, __PACKAGE__]->[-1],
                $c->req->uri,
                $c->req->address,
            ),
            $c->memory_usage_report
        );
    };

}

1;