| Filename | /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Moose/Meta/Method/Accessor/Native/Hash/delete.pm |
| Statements | Executed 17 statements in 1.27ms |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 104µs | 124µs | Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@3 |
| 1 | 1 | 1 | 44µs | 768µs | Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@41 |
| 1 | 1 | 1 | 44µs | 14.8ms | Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@10 |
| 1 | 1 | 1 | 42µs | 111µs | Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@4 |
| 0 | 0 | 0 | 0s | 0s | Moose::Meta::Method::Accessor::Native::Hash::delete::_adds_members |
| 0 | 0 | 0 | 0s | 0s | Moose::Meta::Method::Accessor::Native::Hash::delete::_inline_optimized_set_new_value |
| 0 | 0 | 0 | 0s | 0s | Moose::Meta::Method::Accessor::Native::Hash::delete::_potential_value |
| 0 | 0 | 0 | 0s | 0s | Moose::Meta::Method::Accessor::Native::Hash::delete::_return_value |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package Moose::Meta::Method::Accessor::Native::Hash::delete; | ||||
| 2 | |||||
| 3 | 3 | 117µs | 2 | 144µs | # spent 124µs (104+20) within Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@3 which was called:
# once (104µs+20µs) by Moose::Meta::Attribute::Native::Trait::Hash::BEGIN@13 at line 3 # spent 124µs making 1 call to Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@3
# spent 20µs making 1 call to strict::import |
| 4 | 3 | 257µs | 2 | 180µs | # spent 111µs (42+69) within Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@4 which was called:
# once (42µs+69µs) by Moose::Meta::Attribute::Native::Trait::Hash::BEGIN@13 at line 4 # spent 111µs making 1 call to Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@4
# spent 69µs making 1 call to warnings::import |
| 5 | |||||
| 6 | 1 | 4µs | our $VERSION = '1.19'; | ||
| 7 | 1 | 80µs | $VERSION = eval $VERSION; # spent 10µs executing statements in string eval | ||
| 8 | 1 | 3µs | our $AUTHORITY = 'cpan:STEVAN'; | ||
| 9 | |||||
| 10 | 3 | 611µs | 2 | 29.5ms | # spent 14.8ms (44µs+14.7) within Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@10 which was called:
# once (44µs+14.7ms) by Moose::Meta::Attribute::Native::Trait::Hash::BEGIN@13 at line 10 # spent 14.8ms making 1 call to Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@10
# spent 14.7ms making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:456] |
| 11 | |||||
| 12 | 1 | 33µs | 1 | 42.8ms | with 'Moose::Meta::Method::Accessor::Native::Hash::Writer' => { # spent 42.8ms making 1 call to Moose::Role::with |
| 13 | -excludes => [ | ||||
| 14 | qw( | ||||
| 15 | _inline_optimized_set_new_value | ||||
| 16 | _return_value | ||||
| 17 | ) | ||||
| 18 | ], | ||||
| 19 | }; | ||||
| 20 | |||||
| 21 | sub _adds_members { 0 } | ||||
| 22 | |||||
| 23 | sub _potential_value { | ||||
| 24 | my ( $self, $slot_access ) = @_; | ||||
| 25 | |||||
| 26 | return "( do { my \%potential = %{ ($slot_access) }; \@return = delete \@potential{\@_}; \\\%potential; } )"; | ||||
| 27 | } | ||||
| 28 | |||||
| 29 | sub _inline_optimized_set_new_value { | ||||
| 30 | my ( $self, $inv, $new, $slot_access ) = @_; | ||||
| 31 | |||||
| 32 | return "\@return = delete \@{ ($slot_access) }{\@_}"; | ||||
| 33 | } | ||||
| 34 | |||||
| 35 | sub _return_value { | ||||
| 36 | my ( $self, $slot_access ) = @_; | ||||
| 37 | |||||
| 38 | return 'return wantarray ? @return : $return[-1];'; | ||||
| 39 | } | ||||
| 40 | |||||
| 41 | 3 | 114µs | 2 | 1.49ms | # spent 768µs (44+724) within Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@41 which was called:
# once (44µs+724µs) by Moose::Meta::Attribute::Native::Trait::Hash::BEGIN@13 at line 41 # spent 768µs making 1 call to Moose::Meta::Method::Accessor::Native::Hash::delete::BEGIN@41
# spent 724µs making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:557] |
| 42 | |||||
| 43 | 1 | 45µs | 1; |