← Index
NYTProf Performance Profile   « line view »
For /Users/timbo/perl5/perlbrew/perls/perl-5.18.2/bin/perlcritic
  Run on Sat Mar 19 22:12:22 2016
Reported on Sat Mar 19 22:14:11 2016

Filename/Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Perl/Critic/PolicyParameter/Behavior.pm
StatementsExecuted 20 statements in 211µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11115µs15µsPerl::Critic::PolicyParameter::Behavior::::BEGIN@10Perl::Critic::PolicyParameter::Behavior::BEGIN@10
11110µs13µsPerl::Critic::PolicyParameter::Behavior::::BEGIN@12Perl::Critic::PolicyParameter::Behavior::BEGIN@12
5119µs9µsPerl::Critic::PolicyParameter::Behavior::::newPerl::Critic::PolicyParameter::Behavior::new
1117µs274µsPerl::Critic::PolicyParameter::Behavior::::BEGIN@14Perl::Critic::PolicyParameter::Behavior::BEGIN@14
1116µs17µsPerl::Critic::PolicyParameter::Behavior::::BEGIN@11Perl::Critic::PolicyParameter::Behavior::BEGIN@11
0000s0sPerl::Critic::PolicyParameter::Behavior::::generate_parameter_descriptionPerl::Critic::PolicyParameter::Behavior::generate_parameter_description
0000s0sPerl::Critic::PolicyParameter::Behavior::::initialize_parameterPerl::Critic::PolicyParameter::Behavior::initialize_parameter
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1##############################################################################
2# $URL$
3# $Date$
4# $Author$
5# $Revision$
6##############################################################################
7
8package Perl::Critic::PolicyParameter::Behavior;
9
10238µs115µs
# spent 15µs within Perl::Critic::PolicyParameter::Behavior::BEGIN@10 which was called: # once (15µs+0s) by Perl::Critic::PolicyParameter::BEGIN@23 at line 10
use 5.006001;
11218µs228µs
# spent 17µs (6+11) within Perl::Critic::PolicyParameter::Behavior::BEGIN@11 which was called: # once (6µs+11µs) by Perl::Critic::PolicyParameter::BEGIN@23 at line 11
use strict;
# spent 17µs making 1 call to Perl::Critic::PolicyParameter::Behavior::BEGIN@11 # spent 11µs making 1 call to strict::import
12223µs217µs
# spent 13µs (10+4) within Perl::Critic::PolicyParameter::Behavior::BEGIN@12 which was called: # once (10µs+4µs) by Perl::Critic::PolicyParameter::BEGIN@23 at line 12
use warnings;
# spent 13µs making 1 call to Perl::Critic::PolicyParameter::Behavior::BEGIN@12 # spent 4µs making 1 call to warnings::import
13
142115µs2541µs
# spent 274µs (7+267) within Perl::Critic::PolicyParameter::Behavior::BEGIN@14 which was called: # once (7µs+267µs) by Perl::Critic::PolicyParameter::BEGIN@23 at line 14
use Perl::Critic::Utils qw{ :characters };
# spent 274µs making 1 call to Perl::Critic::PolicyParameter::Behavior::BEGIN@14 # spent 267µs making 1 call to Exporter::import
15
161600nsour $VERSION = '1.121';
17
18#-----------------------------------------------------------------------------
19
20
# spent 9µs within Perl::Critic::PolicyParameter::Behavior::new which was called 5 times, avg 2µs/call: # 5 times (9µs+0s) by Perl::Critic::Policy::BEGIN@45 at line 42 of Perl/Critic/PolicyParameter.pm, avg 2µs/call
sub new {
2151µs my $class = shift;
22
23513µs return bless {}, $class;
24}
25
26#-----------------------------------------------------------------------------
27
28sub initialize_parameter {
29 my ($self, $parameter, $specification) = @_;
30
31 return;
32}
33
34#-----------------------------------------------------------------------------
35
36sub generate_parameter_description {
37 my ($self, $parameter) = @_;
38
39 return $parameter->_get_description_with_trailing_period();
40}
41
42#-----------------------------------------------------------------------------
43
4412µs1;
45
46__END__