| Filename | /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Moose/Meta/Method/Accessor/Native/Array/Writer.pm |
| Statements | Executed 15 statements in 860µs |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 83µs | 100µs | Moose::Meta::Method::Accessor::Native::Array::Writer::BEGIN@3 |
| 1 | 1 | 1 | 43µs | 14.8ms | Moose::Meta::Method::Accessor::Native::Array::Writer::BEGIN@10 |
| 1 | 1 | 1 | 41µs | 110µs | Moose::Meta::Method::Accessor::Native::Array::Writer::BEGIN@4 |
| 1 | 1 | 1 | 11µs | 11µs | Moose::Meta::Method::Accessor::Native::Array::Writer::_new_members |
| 0 | 0 | 0 | 0s | 0s | Moose::Meta::Method::Accessor::Native::Array::Writer::_inline_copy_old_value |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package Moose::Meta::Method::Accessor::Native::Array::Writer; | ||||
| 2 | |||||
| 3 | 3 | 122µs | 2 | 118µs | # spent 100µs (83+18) within Moose::Meta::Method::Accessor::Native::Array::Writer::BEGIN@3 which was called:
# once (83µs+18µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 3 # spent 100µs making 1 call to Moose::Meta::Method::Accessor::Native::Array::Writer::BEGIN@3
# spent 18µs making 1 call to strict::import |
| 4 | 3 | 227µs | 2 | 179µs | # spent 110µs (41+69) within Moose::Meta::Method::Accessor::Native::Array::Writer::BEGIN@4 which was called:
# once (41µs+69µs) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 4 # spent 110µs making 1 call to Moose::Meta::Method::Accessor::Native::Array::Writer::BEGIN@4
# spent 69µs making 1 call to warnings::import |
| 5 | |||||
| 6 | 1 | 4µs | our $VERSION = '1.19'; | ||
| 7 | 1 | 74µs | $VERSION = eval $VERSION; # spent 12µs executing statements in string eval | ||
| 8 | 1 | 3µs | our $AUTHORITY = 'cpan:STEVAN'; | ||
| 9 | |||||
| 10 | 3 | 367µs | 2 | 29.7ms | # spent 14.8ms (43µs+14.8) within Moose::Meta::Method::Accessor::Native::Array::Writer::BEGIN@10 which was called:
# once (43µs+14.8ms) by Class::MOP::__ANON__[/home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Class/MOP.pm:118] at line 10 # spent 14.8ms making 1 call to Moose::Meta::Method::Accessor::Native::Array::Writer::BEGIN@10
# spent 14.8ms making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:456] |
| 11 | |||||
| 12 | 1 | 24µs | 1 | 88.2ms | with 'Moose::Meta::Method::Accessor::Native::Writer', # spent 88.2ms making 1 call to Moose::Role::with |
| 13 | 'Moose::Meta::Method::Accessor::Native::Array', | ||||
| 14 | 'Moose::Meta::Method::Accessor::Native::Collection'; | ||||
| 15 | |||||
| 16 | 1 | 17µs | # spent 11µs within Moose::Meta::Method::Accessor::Native::Array::Writer::_new_members which was called:
# once (11µs+0s) by Class::MOP::Class:::around at line 70 of Moose/Meta/Method/Accessor/Native/Collection.pm | ||
| 17 | |||||
| 18 | sub _inline_copy_old_value { | ||||
| 19 | my ( $self, $slot_access ) = @_; | ||||
| 20 | |||||
| 21 | return '[ @{(' . $slot_access . ')} ]'; | ||||
| 22 | } | ||||
| 23 | |||||
| 24 | 1 | 22µs | 1; |