← Index
NYTProf Performance Profile   « block view • line view • sub view »
For 05.Domain_and_Item.t
  Run on Tue May 4 17:21:41 2010
Reported on Tue May 4 17:23:08 2010

File /usr/local/lib/perl5/site_perl/5.10.1/darwin-2level/Moose/Meta/Role/Method/Conflicting.pm
Statements Executed 17
Statement Execution Time 203µs
Subroutines — ordered by exclusive time
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
11115µs18µsMoose::Meta::Role::Method::Conflicting::::BEGIN@4Moose::Meta::Role::Method::Conflicting::BEGIN@4
1118µs18µsMoose::Meta::Role::Method::Conflicting::::BEGIN@5Moose::Meta::Role::Method::Conflicting::BEGIN@5
1118µs122µsMoose::Meta::Role::Method::Conflicting::::BEGIN@7Moose::Meta::Role::Method::Conflicting::BEGIN@7
1117µs48µsMoose::Meta::Role::Method::Conflicting::::BEGIN@9Moose::Meta::Role::Method::Conflicting::BEGIN@9
0000s0sMoose::Meta::Role::Method::Conflicting::::roles_as_english_listMoose::Meta::Role::Method::Conflicting::roles_as_english_list
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::Role::Method::Conflicting;
3
4321µs220µs
# spent 18µs (15+3) within Moose::Meta::Role::Method::Conflicting::BEGIN@4 which was called # once (15µs+3µs) by Moose::Meta::Role::BEGIN@20 at line 4
use strict;
# spent 18µs making 1 call to Moose::Meta::Role::Method::Conflicting::BEGIN@4 # spent 3µs making 1 call to strict::import
5320µs228µs
# spent 18µs (8+10) within Moose::Meta::Role::Method::Conflicting::BEGIN@5 which was called # once (8µs+10µs) by Moose::Meta::Role::BEGIN@20 at line 5
use warnings;
# spent 18µs making 1 call to Moose::Meta::Role::Method::Conflicting::BEGIN@5 # spent 10µs making 1 call to warnings::import
6
7328µs2236µs
# spent 122µs (8+114) within Moose::Meta::Role::Method::Conflicting::BEGIN@7 which was called # once (8µs+114µs) by Moose::Meta::Role::BEGIN@20 at line 7
use Moose::Util;
# spent 122µs making 1 call to Moose::Meta::Role::Method::Conflicting::BEGIN@7 # spent 114µs making 1 call to Sub::Exporter::__ANON__[Sub/Exporter.pm:756]
8
93101µs288µs
# spent 48µs (7+41) within Moose::Meta::Role::Method::Conflicting::BEGIN@9 which was called # once (7µs+41µs) by Moose::Meta::Role::BEGIN@20 at line 9
use base qw(Moose::Meta::Role::Method::Required);
# spent 48µs making 1 call to Moose::Meta::Role::Method::Conflicting::BEGIN@9 # spent 41µs making 1 call to base::import
10
111700nsour $VERSION = '0.98';
12114µs$VERSION = eval $VERSION;
131300nsour $AUTHORITY = 'cpan:STEVAN';
14
1516µs2334µs__PACKAGE__->meta->add_attribute('roles' => (
# spent 270µs making 1 call to Class::MOP::Mixin::HasAttributes::add_attribute # spent 64µs making 1 call to Moose::Meta::Role::Method::Required::meta
16 reader => 'roles',
17 required => 1,
18));
19
20sub roles_as_english_list {
21 my $self = shift;
22 Moose::Util::english_list( map { q{'} . $_ . q{'} } @{ $self->roles } );
23}
24
25112µs1;
26
27__END__
28
29=pod
30
31=head1 NAME
32
33Moose::Meta::Role::Method::Conflicting - A Moose metaclass for conflicting methods in Roles
34
35=head1 DESCRIPTION
36
37=head1 INHERITANCE
38
39C<Moose::Meta::Role::Method::Conflicting> is a subclass of
40L<Moose::Meta::Role::Method::Required>.
41
42=head1 METHODS
43
44=over 4
45
46=item B<< Moose::Meta::Role::Method::Conflicting->new(%options) >>
47
48This creates a new type constraint based on the provided C<%options>:
49
50=over 8
51
52=item * name
53
54The method name. This is required.
55
56=item * roles
57
58The list of role names that generated the conflict. This is required.
59
60=back
61
62=item B<< $method->name >>
63
64Returns the conflicting method's name, as provided to the constructor.
65
66=item B<< $method->roles >>
67
68Returns the roles that generated this conflicting method, as provided to the
69constructor.
70
71=item B<< $method->roles_as_english_list >>
72
73Returns the roles that generated this conflicting method as an English list.
74
75=back
76
77=head1 BUGS
78
79See L<Moose/BUGS> for details on reporting bugs.
80
81=head1 AUTHOR
82
83Stevan Little E<lt>stevan@iinteractive.comE<gt>
84
85=head1 COPYRIGHT AND LICENSE
86
87Copyright 2006-2010 by Infinity Interactive, Inc.
88
89L<http://www.iinteractive.com>
90
91This library is free software; you can redistribute it and/or modify
92it under the same terms as Perl itself.
93
94=cut