| Filename | /home/ss5/perl5/perlbrew/perls/perl-5.22.0/lib/site_perl/5.22.0/Moo/sification.pm |
| Statements | Executed 13 statements in 181µs |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 2 | 2 | 2 | 900µs | 2.69ms | Moo::sification::import |
| 1 | 1 | 1 | 9µs | 21µs | Moo::sification::BEGIN@3 |
| 1 | 1 | 1 | 8µs | 60µs | Moo::sification::BEGIN@5 |
| 1 | 1 | 1 | 5µs | 13µs | Moo::sification::BEGIN@4 |
| 0 | 0 | 0 | 0s | 0s | Moo::HandleMoose::AuthorityHack::DESTROY |
| 0 | 0 | 0 | 0s | 0s | Moo::sification::unimport |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package Moo::sification; | ||||
| 2 | |||||
| 3 | 2 | 17µs | 2 | 34µs | # spent 21µs (9+13) within Moo::sification::BEGIN@3 which was called:
# once (9µs+13µs) by CHI::Stats::BEGIN@6 at line 3 # spent 21µs making 1 call to Moo::sification::BEGIN@3
# spent 13µs making 1 call to Moo::_strictures::import |
| 4 | 2 | 15µs | 2 | 21µs | # spent 13µs (5+8) within Moo::sification::BEGIN@4 which was called:
# once (5µs+8µs) by CHI::Stats::BEGIN@6 at line 4 # spent 13µs making 1 call to Moo::sification::BEGIN@4
# spent 8µs making 1 call to warnings::unimport |
| 5 | 2 | 100µs | 2 | 92µs | # spent 60µs (8+51) within Moo::sification::BEGIN@5 which was called:
# once (8µs+51µs) by CHI::Stats::BEGIN@6 at line 5 # spent 60µs making 1 call to Moo::sification::BEGIN@5
# spent 33µs making 1 call to Sub::Exporter::Progressive::__ANON__[Sub/Exporter/Progressive.pm:40] |
| 6 | |||||
| 7 | sub unimport { | ||||
| 8 | die "Can't disable Moo::sification after inflation has been done" | ||||
| 9 | if $Moo::HandleMoose::SETUP_DONE; | ||||
| 10 | our $disabled = 1; | ||||
| 11 | } | ||||
| 12 | |||||
| 13 | sub Moo::HandleMoose::AuthorityHack::DESTROY { | ||||
| 14 | unless (our $disabled or in_global_destruction) { | ||||
| 15 | require Moo::HandleMoose; | ||||
| 16 | Moo::HandleMoose->import; | ||||
| 17 | } | ||||
| 18 | } | ||||
| 19 | |||||
| 20 | # spent 2.69ms (900µs+1.79) within Moo::sification::import which was called 2 times, avg 1.35ms/call:
# once (898µs+1.79ms) by CHI::Stats::BEGIN@6 at line 10 of Moo.pm
# once (2µs+0s) by CHI::BEGIN@8 at line 12 of Moo/Role.pm | ||||
| 21 | return | ||||
| 22 | 2 | 4µs | if our $setup_done; | ||
| 23 | 1 | 600ns | if ($INC{"Moose.pm"}) { | ||
| 24 | 1 | 39µs | require Moo::HandleMoose; | ||
| 25 | 1 | 1µs | 1 | 29µs | Moo::HandleMoose->import; # spent 29µs making 1 call to Moo::HandleMoose::import |
| 26 | } else { | ||||
| 27 | $Moose::AUTHORITY = bless({}, 'Moo::HandleMoose::AuthorityHack'); | ||||
| 28 | } | ||||
| 29 | 1 | 2µs | $setup_done = 1; | ||
| 30 | } | ||||
| 31 | |||||
| 32 | 1 | 2µs | 1; |