← Index
NYTProf Performance Profile   « line view »
For script/ponapi
  Run on Wed Feb 10 15:51:26 2016
Reported on Thu Feb 11 09:43:09 2016

Filename/usr/local/share/perl/5.18.2/App/Cmd/Plugin.pm
StatementsExecuted 6 statements in 92µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11126µs37µsApp::Cmd::Setup::::BEGIN@1.6 App::Cmd::Setup::BEGIN@1.6
1116µs11µsApp::Cmd::Setup::::BEGIN@2.7 App::Cmd::Setup::BEGIN@2.7
0000s0sApp::Cmd::Plugin::::__ANON__[:13]App::Cmd::Plugin::__ANON__[:13]
0000s0sApp::Cmd::Plugin::::_faux_curried_methodApp::Cmd::Plugin::_faux_curried_method
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1221µs248µs
# spent 37µs (26+11) within App::Cmd::Setup::BEGIN@1.6 which was called: # once (26µs+11µs) by App::Cmd::Setup::BEGIN@74 at line 1
use strict;
# spent 37µs making 1 call to App::Cmd::Setup::BEGIN@1.6 # spent 11µs making 1 call to strict::import
2268µs215µs
# spent 11µs (6+5) within App::Cmd::Setup::BEGIN@2.7 which was called: # once (6µs+5µs) by App::Cmd::Setup::BEGIN@74 at line 2
use warnings;
# spent 11µs making 1 call to App::Cmd::Setup::BEGIN@2.7 # spent 5µs making 1 call to warnings::import
3package App::Cmd::Plugin;
41500ns$App::Cmd::Plugin::VERSION = '0.330';
5# ABSTRACT: a plugin for App::Cmd commands
6
7sub _faux_curried_method {
8 my ($class, $name, $arg) = @_;
9
10 return sub {
11 my $cmd = $App::Cmd::active_cmd;
12 $class->$name($cmd, @_);
13 }
14}
15
1612µs1;
17
18__END__