| 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 | Class::MOP::Mixin::BEGIN@4 |
| 1 | 1 | 1 | 5µs | 20µs | Class::MOP::Mixin::BEGIN@7 |
| 1 | 1 | 1 | 5µs | 18µs | Class::MOP::Mixin::BEGIN@8 |
| 1 | 1 | 1 | 4µs | 7µs | Class::MOP::Mixin::BEGIN@5 |
| 0 | 0 | 0 | 0s | 0s | Class::MOP::Mixin::_throw_exception |
| 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__ |