← Index
NYTProf Performance Profile   « line view »
For fastest.pl
  Run on Fri Jan 31 20:48:16 2014
Reported on Fri Jan 31 20:49:41 2014

Filename/opt/perl-5.18.1/lib/site_perl/5.18.1/darwin-thread-multi-2level/Moose/Meta/Method/Meta.pm
StatementsExecuted 14 statements in 321µs
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
21116µs1.50msMoose::Meta::Method::Meta::::wrapMoose::Meta::Method::Meta::wrap
11112µs12µsMoose::Meta::Method::Meta::::BEGIN@3Moose::Meta::Method::Meta::BEGIN@3
1119µs14µsMoose::Meta::Method::Meta::::BEGIN@11Moose::Meta::Method::Meta::BEGIN@11
1119µs136µsMoose::Meta::Method::Meta::::BEGIN@13Moose::Meta::Method::Meta::BEGIN@13
1118µs24µsMoose::Meta::Method::Meta::::BEGIN@10Moose::Meta::Method::Meta::BEGIN@10
0000s0sMoose::Meta::Method::Meta::::_is_caller_mop_internalMoose::Meta::Method::Meta::_is_caller_mop_internal
0000s0sMoose::Meta::Method::Meta::::_make_compatible_withMoose::Meta::Method::Meta::_make_compatible_with
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1
2package Moose::Meta::Method::Meta;
3
# spent 12µs within Moose::Meta::Method::Meta::BEGIN@3 which was called: # once (12µs+0s) by Moose::Meta::Class::BEGIN@27 at line 5
BEGIN {
417µs $Moose::Meta::Method::Meta::AUTHORITY = 'cpan:STEVAN';
5141µs112µs}
# spent 12µs making 1 call to Moose::Meta::Method::Meta::BEGIN@3
6{
721µs $Moose::Meta::Method::Meta::VERSION = '2.1005';
8}
9
10231µs240µs
# spent 24µs (8+16) within Moose::Meta::Method::Meta::BEGIN@10 which was called: # once (8µs+16µs) by Moose::Meta::Class::BEGIN@27 at line 10
use strict;
# spent 24µs making 1 call to Moose::Meta::Method::Meta::BEGIN@10 # spent 16µs making 1 call to strict::import
11235µs218µs
# spent 14µs (9+5) within Moose::Meta::Method::Meta::BEGIN@11 which was called: # once (9µs+5µs) by Moose::Meta::Class::BEGIN@27 at line 11
use warnings;
# spent 14µs making 1 call to Moose::Meta::Method::Meta::BEGIN@11 # spent 5µs making 1 call to warnings::import
12
131400ns
# spent 136µs (9+128) within Moose::Meta::Method::Meta::BEGIN@13 which was called: # once (9µs+128µs) by Moose::Meta::Class::BEGIN@27 at line 14
use base 'Moose::Meta::Method',
141188µs2264µs 'Class::MOP::Method::Meta';
# spent 136µs making 1 call to Moose::Meta::Method::Meta::BEGIN@13 # spent 128µs making 1 call to base::import
15
16sub _is_caller_mop_internal {
17 my $self = shift;
18 my ($caller) = @_;
19 return 1 if $caller =~ /^Moose(?:::|$)/;
20 return $self->SUPER::_is_caller_mop_internal($caller);
21}
22
23# XXX: ugh multiple inheritance
24
# spent 1.50ms (16µs+1.48) within Moose::Meta::Method::Meta::wrap which was called 2 times, avg 750µs/call: # 2 times (16µs+1.48ms) by Class::MOP::Mixin::HasMethods::_add_meta_method at line 33 of Class/MOP/Mixin/HasMethods.pm, avg 750µs/call
sub wrap {
252800ns my $class = shift;
26213µs21.48ms return $class->Class::MOP::Method::Meta::wrap(@_);
# spent 1.48ms making 2 calls to Class::MOP::Method::Meta::wrap, avg 742µs/call
27}
28
29sub _make_compatible_with {
30 my $self = shift;
31 return $self->Class::MOP::Method::Meta::_make_compatible_with(@_);
32}
33
3414µs1;
35
36# ABSTRACT: A Moose Method metaclass for C<meta> methods
37
38__END__