Filename | /usr/local/lib/perl/5.18.2/Class/MOP/Mixin.pm |
Statements | Executed 128 statements in 453µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 9µs | 18µs | BEGIN@4 | Class::MOP::Mixin::
1 | 1 | 1 | 8µs | 11µs | BEGIN@5 | Class::MOP::Mixin::
1 | 1 | 1 | 6µs | 20µs | BEGIN@8 | Class::MOP::Mixin::
1 | 1 | 1 | 5µs | 25µ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 | 400ns | our $VERSION = '2.1604'; | ||
3 | |||||
4 | 2 | 18µs | 2 | 26µs | # spent 18µs (9+8) within Class::MOP::Mixin::BEGIN@4 which was called:
# once (9µs+8µs) by parent::import at line 4 # spent 18µs making 1 call to Class::MOP::Mixin::BEGIN@4
# spent 8µs making 1 call to strict::import |
5 | 2 | 18µs | 2 | 13µs | # spent 11µs (8+3) within Class::MOP::Mixin::BEGIN@5 which was called:
# once (8µs+3µs) by parent::import at line 5 # spent 11µs making 1 call to Class::MOP::Mixin::BEGIN@5
# spent 3µs making 1 call to warnings::import |
6 | |||||
7 | 2 | 19µs | 2 | 44µs | # spent 25µs (5+20) within Class::MOP::Mixin::BEGIN@7 which was called:
# once (5µs+20µs) by parent::import at line 7 # spent 25µs making 1 call to Class::MOP::Mixin::BEGIN@7
# spent 20µs making 1 call to Exporter::import |
8 | 2 | 85µs | 2 | 33µs | # spent 20µs (6+14) within Class::MOP::Mixin::BEGIN@8 which was called:
# once (6µs+14µs) by parent::import at line 8 # spent 20µs making 1 call to Class::MOP::Mixin::BEGIN@8
# spent 14µs making 1 call to Module::Runtime::import |
9 | |||||
10 | sub meta { | ||||
11 | 59 | 18µs | require Class::MOP::Class; | ||
12 | 59 | 293µs | 118 | 4.16ms | Class::MOP::Class->initialize( blessed( $_[0] ) || $_[0] ); # spent 4.14ms making 59 calls to Class::MOP::Class::initialize, avg 70µs/call
# spent 25µs making 59 calls to Scalar::Util::blessed, avg 419ns/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 | 2µs | 1; | ||
21 | |||||
22 | # ABSTRACT: Base class for mixin classes | ||||
23 | |||||
24 | __END__ |