Filename | /Users/ap13/perl5/lib/perl5/darwin-2level/Class/MOP/Mixin.pm |
Statements | Executed 128 statements in 943µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 13µs | 26µs | BEGIN@4 | Class::MOP::Mixin::
1 | 1 | 1 | 9µs | 25µs | BEGIN@8 | Class::MOP::Mixin::
1 | 1 | 1 | 8µs | 12µs | BEGIN@5 | Class::MOP::Mixin::
1 | 1 | 1 | 8µs | 32µs | BEGIN@7 | Class::MOP::Mixin::
0 | 0 | 0 | 0s | 0s | _throw_exception | Class::MOP::Mixin::
Line | State ments |
Time on line |
Calls | Time in subs |
Code |
---|---|---|---|---|---|
1 | package Class::MOP::Mixin; | ||||
2 | 1 | 600ns | our $VERSION = '2.1403'; | ||
3 | |||||
4 | 2 | 23µs | 2 | 38µs | # spent 26µs (13+13) within Class::MOP::Mixin::BEGIN@4 which was called:
# once (13µs+13µs) by parent::import at line 4 # spent 26µs making 1 call to Class::MOP::Mixin::BEGIN@4
# spent 13µs making 1 call to strict::import |
5 | 2 | 24µs | 2 | 15µs | # spent 12µs (8+4) within Class::MOP::Mixin::BEGIN@5 which was called:
# once (8µs+4µs) by parent::import at line 5 # spent 12µs making 1 call to Class::MOP::Mixin::BEGIN@5
# spent 4µs making 1 call to warnings::import |
6 | |||||
7 | 2 | 24µs | 2 | 55µs | # spent 32µs (8+24) within Class::MOP::Mixin::BEGIN@7 which was called:
# once (8µs+24µs) by parent::import at line 7 # spent 32µs making 1 call to Class::MOP::Mixin::BEGIN@7
# spent 24µs making 1 call to Exporter::import |
8 | 2 | 106µs | 2 | 42µs | # spent 25µs (9+16) within Class::MOP::Mixin::BEGIN@8 which was called:
# once (9µs+16µs) by parent::import at line 8 # spent 25µs making 1 call to Class::MOP::Mixin::BEGIN@8
# spent 16µs making 1 call to Module::Runtime::import |
9 | |||||
10 | sub meta { | ||||
11 | 118 | 763µs | require Class::MOP::Class; | ||
12 | 118 | 9.90ms | Class::MOP::Class->initialize( blessed( $_[0] ) || $_[0] ); # spent 9.84ms making 59 calls to Class::MOP::Class::initialize, avg 167µs/call
# spent 62µs making 59 calls to Scalar::Util::blessed, avg 1µs/call | ||
13 | } | ||||
14 | |||||
15 | sub _throw_exception { | ||||
16 | my ($class, $exception_type, @args_to_exception) = @_; | ||||
17 | die use_module( "Moose::Exception::$exception_type" )->new( @args_to_exception ); | ||||
18 | } | ||||
19 | |||||
20 | 1 | 3µs | 1; | ||
21 | |||||
22 | # ABSTRACT: Base class for mixin classes | ||||
23 | |||||
24 | __END__ |