Filename | /usr/share/perl5/Moo/sification.pm |
Statements | Executed 0 statements in 0s |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 21µs | 86µs | BEGIN@3 | Moo::sification::
1 | 1 | 1 | 4µs | 4µs | BEGIN@4 | Moo::sification::
0 | 0 | 0 | 0s | 0s | DESTROY | Moo::HandleMoose::AuthorityHack::
0 | 0 | 0 | 0s | 0s | unimport | Moo::sification::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package Moo::sification; | ||||
2 | |||||
3 | 3 | 150µs | # spent 86µs (21+65) within Moo::sification::BEGIN@3 which was called:
# once (21µs+65µs) by DBIx::Class::Storage::BlockRunner::BEGIN@16 at line 3 # spent 86µs making 1 call to Moo::sification::BEGIN@3
# spent 36µs making 1 call to strictures::import
# spent 29µs making 1 call to strictures::VERSION | ||
4 | 1 | 4µs | # spent 4µs within Moo::sification::BEGIN@4 which was called:
# once (4µs+0s) by DBIx::Class::Storage::BlockRunner::BEGIN@16 at line 4 # spent 4µs making 1 call to Moo::sification::BEGIN@4 | ||
5 | |||||
6 | sub unimport { our $disarmed = 1 } | ||||
7 | |||||
8 | sub Moo::HandleMoose::AuthorityHack::DESTROY { | ||||
9 | unless (our $disarmed or Moo::_Utils::_in_global_destruction) { | ||||
10 | require Moo::HandleMoose; | ||||
11 | Moo::HandleMoose->import; | ||||
12 | } | ||||
13 | } | ||||
14 | |||||
15 | if ($INC{"Moose.pm"}) { | ||||
16 | require Moo::HandleMoose; | ||||
17 | Moo::HandleMoose->import; | ||||
18 | } else { | ||||
19 | $Moose::AUTHORITY = bless({}, 'Moo::HandleMoose::AuthorityHack'); | ||||
20 | } | ||||
21 | |||||
22 | 1; |