← Index
NYTProf Performance Profile   « block view • line view • sub view »
For -e
  Run on Wed Nov 17 21:45:08 2010
Reported on Wed Nov 17 22:10:12 2010

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/get.pm
StatementsExecuted 32 statements in 1.46ms
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11182µs101µsMoose::Meta::Method::Accessor::Native::Hash::get::::BEGIN@3Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@3
21171µs217µsMoose::Meta::Method::Accessor::Native::Hash::get::::_inline_check_argumentsMoose::Meta::Method::Accessor::Native::Hash::get::_inline_check_arguments
11153µs780µsMoose::Meta::Method::Accessor::Native::Hash::get::::BEGIN@41Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@41
11144µs14.9msMoose::Meta::Method::Accessor::Native::Hash::get::::BEGIN@12Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@12
11140µs108µsMoose::Meta::Method::Accessor::Native::Hash::get::::BEGIN@4Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@4
11139µs207µsMoose::Meta::Method::Accessor::Native::Hash::get::::BEGIN@6Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@6
21136µs36µsMoose::Meta::Method::Accessor::Native::Hash::get::::_return_valueMoose::Meta::Method::Accessor::Native::Hash::get::_return_value
21117µs17µsMoose::Meta::Method::Accessor::Native::Hash::get::::_minimum_argumentsMoose::Meta::Method::Accessor::Native::Hash::get::_minimum_arguments
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package Moose::Meta::Method::Accessor::Native::Hash::get;
2
33107µs2119µs
# spent 101µs (82+19) within Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@3 which was called: # once (82µs+19µ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
use strict;
# spent 101µs making 1 call to Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@3 # spent 18µs making 1 call to strict::import
43113µs2176µs
# spent 108µs (40+68) within Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@4 which was called: # once (40µs+68µ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
use warnings;
# spent 108µs making 1 call to Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@4 # spent 68µs making 1 call to warnings::import
5
63231µs2376µs
# spent 207µs (39+168) within Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@6 which was called: # once (39µs+168µ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 6
use Scalar::Util qw( looks_like_number );
# spent 207µs making 1 call to Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@6 # spent 168µs making 1 call to Exporter::import
7
815µsour $VERSION = '1.19';
9182µs$VERSION = eval $VERSION;
# spent 11µs executing statements in string eval
1013µsour $AUTHORITY = 'cpan:STEVAN';
11
123569µs229.7ms
# spent 14.9ms (44µs+14.8) within Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@12 which was called: # once (44µ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 12
use Moose::Role;
13
14134µs166.4mswith 'Moose::Meta::Method::Accessor::Native::Reader' => {
# spent 66.4ms making 1 call to Moose::Role::with
15 -excludes => [
16 qw(
17 _minimum_arguments
18 _inline_check_arguments
19 )
20 ],
21 },
22 'Moose::Meta::Method::Accessor::Native::Hash';
23
24231µs
# spent 17µs within Moose::Meta::Method::Accessor::Native::Hash::get::_minimum_arguments which was called 2 times, avg 8µs/call: # 2 times (17µs+0s) by Moose::Meta::Method::Accessor::Native::_inline_check_argument_count at line 66 of Moose/Meta/Method/Accessor/Native.pm, avg 8µs/call
sub _minimum_arguments { 1 }
25
26
# spent 217µs (71+146) within Moose::Meta::Method::Accessor::Native::Hash::get::_inline_check_arguments which was called 2 times, avg 109µs/call: # 2 times (71µs+146µs) by Moose::Meta::Method::Accessor::Native::Reader::_reader_core at line 44 of Moose/Meta/Method/Accessor/Native/Reader.pm, avg 109µs/call
sub _inline_check_arguments {
27471µs my $self = shift;
28
29 return
302146µs 'for (@_) {' . "\n"
# spent 146µs making 2 calls to Moose::Meta::Method::Accessor::Native::Hash::_inline_check_var_is_valid_key, avg 73µs/call
31 . $self->_inline_check_var_is_valid_key('$_') . "\n" . '}';
32}
33
34
# spent 36µs within Moose::Meta::Method::Accessor::Native::Hash::get::_return_value which was called 2 times, avg 18µs/call: # 2 times (36µs+0s) by Moose::Meta::Method::Accessor::Native::Reader::_inline_return_value at line 60 of Moose/Meta/Method/Accessor/Native/Reader.pm, avg 18µs/call
sub _return_value {
35650µs my $self = shift;
36 my $slot_access = shift;
37
38 return "\@_ > 1 ? \@{ ($slot_access) }{\@_} : ${slot_access}->{ \$_[0] }";
39}
40
413115µs21.51ms
# spent 780µs (53+727) within Moose::Meta::Method::Accessor::Native::Hash::get::BEGIN@41 which was called: # once (53µs+727µ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 41
no Moose::Role;
42
43146µs1;