← Index
NYTProf Performance Profile   « block view • line view • sub view »
For /usr/bin/epoll_server.pl
  Run on Wed Jan 5 05:34:33 2011
Reported on Wed Jan 5 05:35:58 2011

File /usr/lib/perl5/vendor_perl/5.10.1/Catalyst/DispatchType.pm
Statements Executed 141
Statement Execution Time 1.65ms
Subroutines — ordered by exclusive time
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
130111.46ms1.46msCatalyst::DispatchType::::_is_low_precedenceCatalyst::DispatchType::_is_low_precedence
111161µs13.9msCatalyst::DispatchType::::BEGIN@3Catalyst::DispatchType::BEGIN@3
11143µs510µsCatalyst::DispatchType::::BEGIN@5Catalyst::DispatchType::BEGIN@5
21112µs12µsCatalyst::DispatchType::::listCatalyst::DispatchType::list
0000s0sCatalyst::DispatchType::::expand_actionCatalyst::DispatchType::expand_action
0000s0sCatalyst::DispatchType::::matchCatalyst::DispatchType::match
0000s0sCatalyst::DispatchType::::registerCatalyst::DispatchType::register
0000s0sCatalyst::DispatchType::::uri_for_actionCatalyst::DispatchType::uri_for_action
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1package Catalyst::DispatchType;
2
33322µs227.6ms
# spent 13.9ms (161µs+13.7) within Catalyst::DispatchType::BEGIN@3 which was called # once (161µs+13.7ms) by Class::MOP::__ANON__[/usr/lib/perl5/vendor_perl/5.10.1/i386-linux-thread-multi/Class/MOP.pm:103] at line 3
use Moose;
# spent 13.9ms making 1 call to Catalyst::DispatchType::BEGIN@3 # spent 13.7ms making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:389]
4110µs132.8mswith 'MooseX::Emulate::Class::Accessor::Fast';
# spent 32.8ms making 1 call to Moose::with
53384µs2977µs
# spent 510µs (43+467) within Catalyst::DispatchType::BEGIN@5 which was called # once (43µs+467µs) by Class::MOP::__ANON__[/usr/lib/perl5/vendor_perl/5.10.1/i386-linux-thread-multi/Class/MOP.pm:103] at line 5
no Moose;
# spent 510µs making 1 call to Catalyst::DispatchType::BEGIN@5 # spent 467µs making 1 call to Moose::Exporter::__ANON__[Moose/Exporter.pm:478]
6
7=head1 NAME
8
9Catalyst::DispatchType - DispatchType Base Class
10
11=head1 SYNOPSIS
12
13See L<Catalyst>.
14
15=head1 DESCRIPTION
16
17This is an abstract base class for Dispatch Types.
18
19From a code perspective, dispatch types are used to find which actions
20to call for a given request URL. Website authors will typically work
21with them via subroutine names attributes; a description of dispatch
22at the attribute/URL level is given in L<Catalyst::Manual::Intro>.
23
24=head1 METHODS
25
26=head2 $self->list($c)
27
28abstract method, to be implemented by dispatchtypes. Called to display
29info in debug log.
30
31=cut
32
33223µs
# spent 12µs within Catalyst::DispatchType::list which was called 2 times, avg 6µs/call: # 2 times (12µs+0s) by Catalyst::Dispatcher::_display_action_tables at line 650 of Catalyst/Dispatcher.pm, avg 6µs/call
sub list { }
34
35=head2 $self->match( $c, $path )
36
37abstract method, to be implemented by dispatchtypes. Returns true if the
38dispatch type matches the given path
39
40=cut
41
42sub match { die "Abstract method!" }
43
44=head2 $self->register( $c, $action )
45
46abstract method, to be implemented by dispatchtypes. Takes a
47context object and a L<Catalyst::Action> object.
48
49Should return true if it registers something, or false otherwise.
50
51=cut
52
53sub register { }
54
55=head2 $self->uri_for_action( $action, \@captures )
56
57abstract method, to be implemented by dispatchtypes. Takes a
58L<Catalyst::Action> object and an arrayref of captures, and should
59return either a URI part which if placed in $c->req->path would cause
60$self->match to match this action and set $c->req->captures to the supplied
61arrayref, or undef if unable to do so.
62
63=cut
64
65sub uri_for_action { }
66
67=head2 $self->expand_action
68
69Default fallback, returns nothing. See L<Catalyst::Dispatcher> for more info
70about expand_action.
71
72=cut
73
74sub expand_action { }
75
76130865µs
# spent 1.46ms within Catalyst::DispatchType::_is_low_precedence which was called 130 times, avg 11µs/call: # 130 times (1.46ms+0s) by Catalyst::Dispatcher::register at line 531 of Catalyst/Dispatcher.pm, avg 11µs/call
sub _is_low_precedence { 0 }
77
78=head1 AUTHORS
79
80Catalyst Contributors, see Catalyst.pm
81
82=head1 COPYRIGHT
83
84This library is free software. You can redistribute it and/or modify it under
85the same terms as Perl itself.
86
87=cut
88
89118µs29.34ms__PACKAGE__->meta->make_immutable;
# spent 9.29ms making 1 call to Class::MOP::Class::make_immutable # spent 48µs making 1 call to Catalyst::DispatchType::meta
90
91131µs1;