| Filename | /home/doy/perl5/perlbrew/perls/perl-5.10.1/lib/site_perl/5.10.1/x86_64-linux/Moose/Meta/Method/Accessor/Native/String/chop.pm |
| Statements | Executed 17 statements in 1.21ms |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 1 | 1 | 1 | 79µs | 98µs | Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@3 |
| 1 | 1 | 1 | 45µs | 805µs | Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@42 |
| 1 | 1 | 1 | 43µs | 14.7ms | Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@10 |
| 1 | 1 | 1 | 40µs | 109µs | Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@4 |
| 0 | 0 | 0 | 0s | 0s | Moose::Meta::Method::Accessor::Native::String::chop::_inline_optimized_set_new_value |
| 0 | 0 | 0 | 0s | 0s | Moose::Meta::Method::Accessor::Native::String::chop::_maximum_arguments |
| 0 | 0 | 0 | 0s | 0s | Moose::Meta::Method::Accessor::Native::String::chop::_potential_value |
| 0 | 0 | 0 | 0s | 0s | Moose::Meta::Method::Accessor::Native::String::chop::_return_value |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | package Moose::Meta::Method::Accessor::Native::String::chop; | ||||
| 2 | |||||
| 3 | 3 | 105µs | 2 | 118µs | # spent 98µs (79+19) within Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@3 which was called:
# once (79µs+19µs) by Moose::Meta::Attribute::Native::Trait::String::BEGIN@10 at line 3 # spent 98µs making 1 call to Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@3
# spent 19µs making 1 call to strict::import |
| 4 | 3 | 235µs | 2 | 178µs | # spent 109µs (40+69) within Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@4 which was called:
# once (40µs+69µs) by Moose::Meta::Attribute::Native::Trait::String::BEGIN@10 at line 4 # spent 109µs making 1 call to Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@4
# spent 69µs making 1 call to warnings::import |
| 5 | |||||
| 6 | 1 | 4µs | our $VERSION = '1.19'; | ||
| 7 | 1 | 90µs | $VERSION = eval $VERSION; # spent 11µs executing statements in string eval | ||
| 8 | 1 | 4µs | our $AUTHORITY = 'cpan:STEVAN'; | ||
| 9 | |||||
| 10 | 3 | 576µs | 2 | 29.3ms | # spent 14.7ms (43µs+14.6) within Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@10 which was called:
# once (43µs+14.6ms) by Moose::Meta::Attribute::Native::Trait::String::BEGIN@10 at line 10 # spent 14.7ms making 1 call to Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@10
# spent 14.6ms making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:456] |
| 11 | |||||
| 12 | 1 | 34µs | 1 | 32.9ms | with 'Moose::Meta::Method::Accessor::Native::Writer' => { # spent 32.9ms making 1 call to Moose::Role::with |
| 13 | -excludes => [ | ||||
| 14 | qw( | ||||
| 15 | _maximum_arguments | ||||
| 16 | _inline_optimized_set_new_value | ||||
| 17 | _return_value | ||||
| 18 | ) | ||||
| 19 | ] | ||||
| 20 | }; | ||||
| 21 | |||||
| 22 | sub _maximum_arguments { 0 } | ||||
| 23 | |||||
| 24 | sub _potential_value { | ||||
| 25 | my ( $self, $slot_access ) = @_; | ||||
| 26 | |||||
| 27 | return "( do { my \$val = $slot_access; \@return = chop \$val; \$val } )"; | ||||
| 28 | } | ||||
| 29 | |||||
| 30 | sub _inline_optimized_set_new_value { | ||||
| 31 | my ( $self, $inv, $new, $slot_access ) = @_; | ||||
| 32 | |||||
| 33 | return "\@return = chop $slot_access"; | ||||
| 34 | } | ||||
| 35 | |||||
| 36 | sub _return_value { | ||||
| 37 | my ( $self, $slot_access ) = @_; | ||||
| 38 | |||||
| 39 | return '$return[0]'; | ||||
| 40 | } | ||||
| 41 | |||||
| 42 | 3 | 115µs | 2 | 1.57ms | # spent 805µs (45+760) within Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@42 which was called:
# once (45µs+760µs) by Moose::Meta::Attribute::Native::Trait::String::BEGIN@10 at line 42 # spent 805µs making 1 call to Moose::Meta::Method::Accessor::Native::String::chop::BEGIN@42
# spent 760µs making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:557] |
| 43 | |||||
| 44 | 1 | 46µs | 1; |