Filename | /Users/timbo/perl5/perlbrew/perls/perl-5.18.2/lib/site_perl/5.18.2/Perl/Critic/Policy/ClassHierarchies/ProhibitAutoloading.pm |
Statements | Executed 18 statements in 307µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 17µs | 17µs | BEGIN@10 | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
1 | 1 | 1 | 8µs | 156µs | BEGIN@15 | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
1 | 1 | 1 | 8µs | 60µs | BEGIN@16 | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
1 | 1 | 1 | 7µs | 19µs | BEGIN@11 | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
1 | 1 | 1 | 7µs | 12µs | BEGIN@12 | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
1 | 1 | 1 | 7µs | 28µs | BEGIN@13 | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
1 | 1 | 1 | 6µs | 7µs | default_severity | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
1 | 1 | 1 | 2µs | 2µs | supported_parameters | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
0 | 0 | 0 | 0s | 0s | applies_to | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
0 | 0 | 0 | 0s | 0s | default_themes | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
0 | 0 | 0 | 0s | 0s | violates | Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | ############################################################################## | ||||
2 | # $URL$ | ||||
3 | # $Date$ | ||||
4 | # $Author$ | ||||
5 | # $Revision$ | ||||
6 | ############################################################################## | ||||
7 | |||||
8 | package Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading; | ||||
9 | |||||
10 | 2 | 41µs | 1 | 17µs | # spent 17µs within Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@10 which was called:
# once (17µs+0s) by Module::Pluggable::Object::_require at line 10 # spent 17µs making 1 call to Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@10 |
11 | 2 | 21µs | 2 | 31µs | # spent 19µs (7+12) within Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@11 which was called:
# once (7µs+12µs) by Module::Pluggable::Object::_require at line 11 # spent 19µs making 1 call to Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@11
# spent 12µs making 1 call to strict::import |
12 | 2 | 19µs | 2 | 17µs | # spent 12µs (7+5) within Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@12 which was called:
# once (7µs+5µs) by Module::Pluggable::Object::_require at line 12 # spent 12µs making 1 call to Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@12
# spent 5µs making 1 call to warnings::import |
13 | 2 | 23µs | 2 | 50µs | # spent 28µs (7+22) within Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@13 which was called:
# once (7µs+22µs) by Module::Pluggable::Object::_require at line 13 # spent 28µs making 1 call to Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@13
# spent 22µs making 1 call to Exporter::import |
14 | |||||
15 | 2 | 25µs | 2 | 305µs | # spent 156µs (8+149) within Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@15 which was called:
# once (8µs+149µs) by Module::Pluggable::Object::_require at line 15 # spent 156µs making 1 call to Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@15
# spent 149µs making 1 call to Exporter::import |
16 | 2 | 164µs | 2 | 112µs | # spent 60µs (8+52) within Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@16 which was called:
# once (8µs+52µs) by Module::Pluggable::Object::_require at line 16 # spent 60µs making 1 call to Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::BEGIN@16
# spent 52µs making 1 call to base::import |
17 | |||||
18 | 1 | 600ns | our $VERSION = '1.121'; | ||
19 | |||||
20 | #----------------------------------------------------------------------------- | ||||
21 | |||||
22 | 1 | 2µs | 1 | 30µs | Readonly::Scalar my $DESC => q{AUTOLOAD method declared}; # spent 30µs making 1 call to Readonly::Scalar |
23 | 1 | 2µs | 1 | 44µs | Readonly::Scalar my $EXPL => [ 393 ]; # spent 44µs making 1 call to Readonly::Scalar |
24 | |||||
25 | #----------------------------------------------------------------------------- | ||||
26 | |||||
27 | 1 | 6µs | # spent 2µs within Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::supported_parameters which was called:
# once (2µs+0s) by Perl::Critic::Policy::new at line 88 of Perl/Critic/Policy.pm | ||
28 | 1 | 2µs | # spent 7µs (6+1) within Perl::Critic::Policy::ClassHierarchies::ProhibitAutoloading::default_severity which was called:
# once (6µs+1µs) by Perl::Critic::Policy::get_severity at line 331 of Perl/Critic/Policy.pm | ||
29 | sub default_themes { return qw( core maintenance pbp ) } | ||||
30 | sub applies_to { return 'PPI::Statement::Sub' } | ||||
31 | |||||
32 | #----------------------------------------------------------------------------- | ||||
33 | |||||
34 | sub violates { | ||||
35 | my ($self, $elem, undef) = @_; | ||||
36 | |||||
37 | if( $elem->name eq 'AUTOLOAD' ) { | ||||
38 | return $self->violation( $DESC, $EXPL, $elem ); | ||||
39 | } | ||||
40 | return; #ok! | ||||
41 | } | ||||
42 | |||||
43 | 1 | 3µs | 1; | ||
44 | |||||
45 | #----------------------------------------------------------------------------- | ||||
46 | |||||
47 | __END__ |