Filename | /home/ss5/perl5/perlbrew/perls/perl-5.22.0/lib/site_perl/5.22.0/Moo/_strictures.pm |
Statements | Executed 44 statements in 120µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
13 | 13 | 13 | 67µs | 128µs | import | Moo::_strictures::
1 | 1 | 1 | 6µs | 8µs | BEGIN@2 | Moo::_strictures::
1 | 1 | 1 | 4µs | 6µs | BEGIN@3 | Moo::_strictures::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package Moo::_strictures; | ||||
2 | 2 | 12µs | 2 | 9µs | # spent 8µs (6+1) within Moo::_strictures::BEGIN@2 which was called:
# once (6µs+1µs) by Moo::BEGIN@3 at line 2 # spent 8µs making 1 call to Moo::_strictures::BEGIN@2
# spent 1µs making 1 call to strict::import |
3 | 2 | 49µs | 2 | 9µs | # spent 6µs (4+3) within Moo::_strictures::BEGIN@3 which was called:
# once (4µs+3µs) by Moo::BEGIN@3 at line 3 # spent 6µs making 1 call to Moo::_strictures::BEGIN@3
# spent 3µs making 1 call to warnings::import |
4 | |||||
5 | # spent 128µs (67+61) within Moo::_strictures::import which was called 13 times, avg 10µs/call:
# once (8µs+10µs) by Method::Generate::Accessor::BEGIN@3 at line 3 of Method/Generate/Accessor.pm
# once (7µs+8µs) by Method::Generate::BuildAll::BEGIN@3 at line 3 of Method/Generate/BuildAll.pm
# once (6µs+6µs) by Moo::sification::BEGIN@3 at line 3 of Moo/sification.pm
# once (6µs+5µs) by Moo::Role::BEGIN@3 at line 3 of Moo/Role.pm
# once (5µs+4µs) by Method::Generate::Constructor::BEGIN@3 at line 3 of Method/Generate/Constructor.pm
# once (6µs+3µs) by Moo::BEGIN@3 at line 3 of Moo.pm
# once (5µs+4µs) by Moo::HandleMoose::BEGIN@2 at line 2 of Moo/HandleMoose.pm
# once (4µs+4µs) by Moo::HandleMoose::FakeMetaClass::BEGIN@2 at line 2 of Moo/HandleMoose/FakeMetaClass.pm
# once (4µs+3µs) by Sub::Quote::BEGIN@5 at line 5 of Sub/Quote.pm
# once (4µs+3µs) by Moo::Object::BEGIN@3 at line 3 of Moo/Object.pm
# once (3µs+4µs) by Moo::_Utils::BEGIN@18 at line 18 of Moo/_Utils.pm
# once (4µs+3µs) by Sub::Defer::BEGIN@3 at line 3 of Sub/Defer.pm
# once (4µs+3µs) by Moo::_mro::BEGIN@2 at line 2 of Moo/_mro.pm | ||||
6 | 13 | 34µs | if ($ENV{MOO_FATAL_WARNINGS}) { | ||
7 | require strictures; | ||||
8 | strictures->VERSION(2); | ||||
9 | @_ = ('strictures'); | ||||
10 | goto &strictures::import; | ||||
11 | } | ||||
12 | else { | ||||
13 | 13 | 11µs | 13 | 20µs | strict->import; # spent 20µs making 13 calls to strict::import, avg 2µs/call |
14 | 13 | 12µs | 13 | 42µs | warnings->import; # spent 42µs making 13 calls to warnings::import, avg 3µs/call |
15 | } | ||||
16 | } | ||||
17 | |||||
18 | 1 | 2µs | 1; |