Filename | /home/ss5/perl5/perlbrew/perls/perl-5.22.0/lib/site_perl/5.22.0/x86_64-linux/Class/MOP/Mixin.pm |
Statements | Executed 128 statements in 371µs |
Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
---|---|---|---|---|---|
1 | 1 | 1 | 12µs | 13µs | BEGIN@4 | Class::MOP::Mixin::
1 | 1 | 1 | 5µs | 20µs | BEGIN@7 | Class::MOP::Mixin::
1 | 1 | 1 | 5µs | 18µs | BEGIN@8 | Class::MOP::Mixin::
1 | 1 | 1 | 4µs | 7µs | BEGIN@5 | 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 | 300ns | our $VERSION = '2.1605'; | ||
3 | |||||
4 | 2 | 14µs | 2 | 15µs | # spent 13µs (12+1) within Class::MOP::Mixin::BEGIN@4 which was called:
# once (12µs+1µs) by parent::import at line 4 # spent 13µs making 1 call to Class::MOP::Mixin::BEGIN@4
# spent 1µs making 1 call to strict::import |
5 | 2 | 13µs | 2 | 10µs | # spent 7µs (4+3) within Class::MOP::Mixin::BEGIN@5 which was called:
# once (4µs+3µs) by parent::import at line 5 # spent 7µs making 1 call to Class::MOP::Mixin::BEGIN@5
# spent 3µs making 1 call to warnings::import |
6 | |||||
7 | 2 | 13µs | 2 | 36µs | # spent 20µs (5+15) within Class::MOP::Mixin::BEGIN@7 which was called:
# once (5µs+15µs) by parent::import at line 7 # spent 20µs making 1 call to Class::MOP::Mixin::BEGIN@7
# spent 15µs making 1 call to Exporter::import |
8 | 2 | 72µs | 2 | 31µs | # spent 18µs (5+13) within Class::MOP::Mixin::BEGIN@8 which was called:
# once (5µs+13µs) by parent::import at line 8 # spent 18µs making 1 call to Class::MOP::Mixin::BEGIN@8
# spent 13µs making 1 call to Module::Runtime::import |
9 | |||||
10 | sub meta { | ||||
11 | 59 | 21µs | require Class::MOP::Class; | ||
12 | 59 | 235µs | 118 | 3.36ms | Class::MOP::Class->initialize( blessed( $_[0] ) || $_[0] ); # spent 3.34ms making 59 calls to Class::MOP::Class::initialize, avg 57µs/call
# spent 19µs making 59 calls to Scalar::Util::blessed, avg 320ns/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__ |