| 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 | Moo::_strictures::import |
| 1 | 1 | 1 | 6µs | 8µs | Moo::_strictures::BEGIN@2 |
| 1 | 1 | 1 | 4µs | 6µs | Moo::_strictures::BEGIN@3 |
| 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; |