Profile of Moose/Meta/Method/Accessor/Native/String/prepend.pm

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/prepend.pm
Statements	Executed 17 statements in 1.24ms

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	79µs	97µs	Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@3
1	1	1	49µs	844µs	Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@38
1	1	1	44µs	14.9ms	Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@10
1	1	1	40µs	108µs	Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@4
0	0	0	0s	0s	Moose::Meta::Method::Accessor::Native::String::prepend::_inline_optimized_set_new_value
0	0	0	0s	0s	Moose::Meta::Method::Accessor::Native::String::prepend::_maximum_arguments
0	0	0	0s	0s	Moose::Meta::Method::Accessor::Native::String::prepend::_minimum_arguments
0	0	0	0s	0s	Moose::Meta::Method::Accessor::Native::String::prepend::_potential_value

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					package Moose::Meta::Method::Accessor::Native::String::prepend;
2
3	3	105µs	2	115µs	# spent 97µs (79+18) within Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@3 which was called: # once (79µs+18µs) by Moose::Meta::Attribute::Native::Trait::String::BEGIN@15 at line 3 use strict; # spent 97µs making 1 call to Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@3 # spent 18µs making 1 call to strict::import
4	3	241µs	2	175µs	# spent 108µs (40+68) within Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@4 which was called: # once (40µs+68µs) by Moose::Meta::Attribute::Native::Trait::String::BEGIN@15 at line 4 use warnings; # spent 108µs making 1 call to Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@4 # spent 68µs making 1 call to warnings::import
5
6	1	4µs			our $VERSION = '1.19';
7	1	82µs			$VERSION = eval $VERSION; # spent 11µs executing statements in string eval
8	1	4µs			our $AUTHORITY = 'cpan:STEVAN';
9
10	3	603µs	2	29.8ms	# spent 14.9ms (44µs+14.9) within Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@10 which was called: # once (44µs+14.9ms) by Moose::Meta::Attribute::Native::Trait::String::BEGIN@15 at line 10 use Moose::Role; # spent 14.9ms making 1 call to Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@10 # spent 14.9ms making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:456]
11
12	1	34µs	1	32.5ms	with 'Moose::Meta::Method::Accessor::Native::Writer' => { # spent 32.5ms making 1 call to Moose::Role::with
13					-excludes => [
14					qw(
15					_minimum_arguments
16					_maximum_arguments
17					_inline_optimized_set_new_value
18					)
19					]
20					};
21
22					sub _minimum_arguments { 1 }
23
24					sub _maximum_arguments { 1 }
25
26					sub _potential_value {
27					my ( $self, $slot_access ) = @_;
28
29					return "( \$_[0] . $slot_access )";
30					}
31
32					sub _inline_optimized_set_new_value {
33					my ( $self, $inv, $new, $slot_access ) = @_;
34
35					return "$slot_access = \$_[0] . $slot_access";
36					}
37
38	3	119µs	2	1.64ms	# spent 844µs (49+795) within Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@38 which was called: # once (49µs+795µs) by Moose::Meta::Attribute::Native::Trait::String::BEGIN@15 at line 38 no Moose::Role; # spent 844µs making 1 call to Moose::Meta::Method::Accessor::Native::String::prepend::BEGIN@38 # spent 795µs making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:557]
39
40	1	48µs			1;