Profile of /usr/local/lib/perl5/site_perl/5.10.1/darwin-2level/Moose/Meta/Role/Method/Conflicting.pm

← 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:22:21 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
--- | --- | --- | --- | --- | ---
1 | 1 | 1 | 15µs | 18µs | Moose::Meta::Role::Method::Conflicting::::BEGIN@4Moose::Meta::Role::Method::Conflicting::BEGIN@4
1 | 1 | 1 | 8µs | 18µs | Moose::Meta::Role::Method::Conflicting::::BEGIN@5Moose::Meta::Role::Method::Conflicting::BEGIN@5
1 | 1 | 1 | 8µs | 122µs | Moose::Meta::Role::Method::Conflicting::::BEGIN@7Moose::Meta::Role::Method::Conflicting::BEGIN@7
1 | 1 | 1 | 7µs | 48µs | Moose::Meta::Role::Method::Conflicting::::BEGIN@9Moose::Meta::Role::Method::Conflicting::BEGIN@9
0 | 0 | 0 | 0s | 0s | Moose::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 |  |  |  |  |
2 |  |  |  |  | package Moose::Meta::Role::Method::Conflicting;
3 |  |  |  |  |
4 | 3 | 21µs | 2 | 20µ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
5 | 3 | 20µs | 2 | 28µ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 |  |  |  |  |
7 | 3 | 28µs | 2 | 236µ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 |  |  |  |  |
9 | 3 | 101µs | 2 | 88µ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 |  |  |  |  |
11 | 1 | 700ns |  |  | our $VERSION = '0.98';
12 | 1 | 14µs |  |  | $VERSION = eval $VERSION;
13 | 1 | 300ns |  |  | our $AUTHORITY = 'cpan:STEVAN';
14 |  |  |  |  |
15 | 1 | 6µs | 2 | 334µ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 |  |  |  |  |
20 |  |  |  |  | sub roles_as_english_list {
21 |  |  |  |  | my $self = shift;
22 |  |  |  |  | Moose::Util::english_list( map { q{'} . $_ . q{'} } @{ $self->roles } );
23 |  |  |  |  | }
24 |  |  |  |  |
25 | 1 | 12µs |  |  | 1;
26 |  |  |  |  |
27 |  |  |  |  | __END__
28 |  |  |  |  |
29 |  |  |  |  | =pod
30 |  |  |  |  |
31 |  |  |  |  | =head1 NAME
32 |  |  |  |  |
33 |  |  |  |  | Moose::Meta::Role::Method::Conflicting - A Moose metaclass for conflicting methods in Roles
34 |  |  |  |  |
35 |  |  |  |  | =head1 DESCRIPTION
36 |  |  |  |  |
37 |  |  |  |  | =head1 INHERITANCE
38 |  |  |  |  |
39 |  |  |  |  | C<Moose::Meta::Role::Method::Conflicting> is a subclass of
40 |  |  |  |  | L<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 |  |  |  |  |
48 |  |  |  |  | This creates a new type constraint based on the provided C<%options>:
49 |  |  |  |  |
50 |  |  |  |  | =over 8
51 |  |  |  |  |
52 |  |  |  |  | =item * name
53 |  |  |  |  |
54 |  |  |  |  | The method name. This is required.
55 |  |  |  |  |
56 |  |  |  |  | =item * roles
57 |  |  |  |  |
58 |  |  |  |  | The list of role names that generated the conflict. This is required.
59 |  |  |  |  |
60 |  |  |  |  | =back
61 |  |  |  |  |
62 |  |  |  |  | =item B<< $method->name >>
63 |  |  |  |  |
64 |  |  |  |  | Returns the conflicting method's name, as provided to the constructor.
65 |  |  |  |  |
66 |  |  |  |  | =item B<< $method->roles >>
67 |  |  |  |  |
68 |  |  |  |  | Returns the roles that generated this conflicting method, as provided to the
69 |  |  |  |  | constructor.
70 |  |  |  |  |
71 |  |  |  |  | =item B<< $method->roles_as_english_list >>
72 |  |  |  |  |
73 |  |  |  |  | Returns the roles that generated this conflicting method as an English list.
74 |  |  |  |  |
75 |  |  |  |  | =back
76 |  |  |  |  |
77 |  |  |  |  | =head1 BUGS
78 |  |  |  |  |
79 |  |  |  |  | See L<Moose/BUGS> for details on reporting bugs.
80 |  |  |  |  |
81 |  |  |  |  | =head1 AUTHOR
82 |  |  |  |  |
83 |  |  |  |  | Stevan Little E<lt>stevan@iinteractive.comE<gt>
84 |  |  |  |  |
85 |  |  |  |  | =head1 COPYRIGHT AND LICENSE
86 |  |  |  |  |
87 |  |  |  |  | Copyright 2006-2010 by Infinity Interactive, Inc.
88 |  |  |  |  |
89 |  |  |  |  | L<http://www.iinteractive.com>
90 |  |  |  |  |
91 |  |  |  |  | This library is free software; you can redistribute it and/or modify
92 |  |  |  |  | it under the same terms as Perl itself.
93 |  |  |  |  |
94 |  |  |  |  | =cut