Profile of /usr/lib/perl5/vendor_perl/5.10.1/i386-linux-thread-multi/Moose/Meta/Role/Method/Required.pm

File	/usr/lib/perl5/vendor_perl/5.10.1/i386-linux-thread-multi/Moose/Meta/Role/Method/Required.pm
Statements Executed	26
Statement Execution Time	652µs

Subroutines — ordered by exclusive time
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
6	1	1	117µs	1.37ms	Moose::Meta::Role::Method::Required::new
1	1	1	25µs	31µs	Moose::Meta::Role::Method::Required::BEGIN@4
1	1	1	20µs	81µs	Moose::Meta::Role::Method::Required::BEGIN@8
1	1	1	15µs	281µs	Moose::Meta::Role::Method::Required::BEGIN@6
1	1	1	14µs	117µs	Moose::Meta::Role::Method::Required::BEGIN@11
1	1	1	14µs	38µs	Moose::Meta::Role::Method::Required::BEGIN@5
0	0	0	0s	0s	Moose::Meta::Role::Method::Required::__ANON__[:8]

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::Required;
3
4	3	38µs	2	36µs	# spent 31µs (25+5) within Moose::Meta::Role::Method::Required::BEGIN@4 which was called # once (25µs+5µs) by Moose::Meta::Role::BEGIN@19 at line 4 use strict; # spent 31µs making 1 call to Moose::Meta::Role::Method::Required::BEGIN@4 # spent 5µs making 1 call to strict::import
5	3	36µs	2	62µs	# spent 38µs (14+24) within Moose::Meta::Role::Method::Required::BEGIN@5 which was called # once (14µs+24µs) by Moose::Meta::Role::BEGIN@19 at line 5 use warnings; # spent 38µs making 1 call to Moose::Meta::Role::Method::Required::BEGIN@5 # spent 24µs making 1 call to warnings::import
6	3	275µs	2	546µs	# spent 281µs (15+266) within Moose::Meta::Role::Method::Required::BEGIN@6 which was called # once (15µs+266µs) by Moose::Meta::Role::BEGIN@19 at line 6 use metaclass; # spent 281µs making 1 call to Moose::Meta::Role::Method::Required::BEGIN@6 # spent 266µs making 1 call to metaclass::import
7
8					# spent 81µs (20+61) within Moose::Meta::Role::Method::Required::BEGIN@8 which was called # once (20µs+61µs) by Moose::Meta::Role::BEGIN@19 at line 9 use overload '""' => sub { shift->name }, # stringify to method name
9	3	49µs	2	142µs	fallback => 1; # spent 81µs making 1 call to Moose::Meta::Role::Method::Required::BEGIN@8 # spent 61µs making 1 call to overload::import
10
11	3	117µs	2	220µs	# spent 117µs (14+103) within Moose::Meta::Role::Method::Required::BEGIN@11 which was called # once (14µs+103µs) by Moose::Meta::Role::BEGIN@19 at line 11 use base qw(Class::MOP::Object); # spent 117µs making 1 call to Moose::Meta::Role::Method::Required::BEGIN@11 # spent 103µs making 1 call to base::import
12
13	1	1µs			our $VERSION = '1.01';
14	1	23µs			$VERSION = eval $VERSION;
15	1	1µs			our $AUTHORITY = 'cpan:STEVAN';
16
17					# This is not a Moose::Meta::Role::Method because it has no implementation, it
18					# is just a name
19
20	1	8µs	2	1.19ms	__PACKAGE__->meta->add_attribute('name' => ( # spent 1.15ms making 1 call to Class::MOP::Mixin::HasAttributes::add_attribute # spent 32µs making 1 call to Moose::Meta::Role::Method::Required::meta
21					reader => 'name',
22					required => 1,
23					));
24
25	6	97µs	6	1.26ms	# spent 1.37ms (117µs+1.26) within Moose::Meta::Role::Method::Required::new which was called 6 times, avg 229µs/call: # 6 times (117µs+1.26ms) by Moose::Meta::Role::add_required_methods at line 215 of Moose/Meta/Role.pm, avg 229µs/call sub new { shift->_new(@_) } # spent 1.26ms making 6 calls to Moose::Meta::Role::Method::Required::_new, avg 210µs/call
26
27	1	8µs			1;
28
29					__END__
30
31					=pod
32
33					=head1 NAME
34
35					Moose::Meta::Role::Method::Required - A Moose metaclass for required methods in Roles
36
37					=head1 DESCRIPTION
38
39					=head1 INHERITANCE
40
41					C<Moose::Meta::Role::Method::Required> is a subclass of L<Class::MOP::Object>.
42					It is B<not> a subclass of C<Moose::Meta::Role::Method> since it does not
43					provide an implementation of the method.
44
45					=head1 METHODS
46
47					=over 4
48
49					=item B<< Moose::Meta::Role::Method::Required->new(%options) >>
50
51					This creates a new type constraint based on the provided C<%options>:
52
53					=over 8
54
55					=item * name
56
57					The method name. This is required.
58
59					=back
60
61					=item B<< $method->name >>
62
63					Returns the required method's name, as provided to the constructor.
64
65					=back
66
67					=head1 BUGS
68
69					See L<Moose/BUGS> for details on reporting bugs.
70
71					=head1 AUTHOR
72
73					Stevan Little E<lt>stevan@iinteractive.comE<gt>
74
75					=head1 COPYRIGHT AND LICENSE
76
77					Copyright 2006-2010 by Infinity Interactive, Inc.
78
79					L<http://www.iinteractive.com>
80
81					This library is free software; you can redistribute it and/or modify
82					it under the same terms as Perl itself.
83
84					=cut