assorted doc tweaks in Tutorial
[catagits/Catalyst-Manual.git] / lib / Catalyst / Manual / Intro.pod
CommitLineData
cb93c9d7 1=head1 NAME
2
3Catalyst::Manual::Intro - Introduction to Catalyst
4
5=head1 DESCRIPTION
6
7This is a brief introduction to Catalyst. It explains the most important
8features of how Catalyst works and shows how to get a simple application
9up and running quickly. For an introduction (without code) to Catalyst
10itself, and why you should be using it, see L<Catalyst::Manual::About>.
11For a systematic step-by-step introduction to writing an application
12with Catalyst, see L<Catalyst::Manual::Tutorial>.
13
14=head2 What is Catalyst?
15
16Catalyst is an elegant web application framework, extremely flexible
792ad331 17yet extremely simple. It's similar to Ruby on Rails, Spring (Java), and
18L<Maypole|Maypole>, upon which it was originally based. Its most
19important design philosphy is to provide easy access to all the tools
20you need to develop web applications, with few restrictions on how you
21need to use these tools. However, this does mean that it is always
22possible to do things in a different way. Other web frameworks are
23I<initially> simpler to use, but achieve this by locking the programmer
24into a single set of tools. Catalyst's emphasis on flexibility means
25that you have to think more to use it. We view this as a feature. For
26example, this leads to Catalyst being more suited to system integration
27tasks than other web frameworks.
cb93c9d7 28
29=head3 MVC
30
31Catalyst follows the Model-View-Controller (MVC) design pattern,
32allowing you to easily separate concerns, like content, presentation,
33and flow control, into separate modules. This separation allows you to
34modify code that handles one concern without affecting code that handles
35the others. Catalyst promotes the re-use of existing Perl modules that
36already handle common web application concerns well.
37
38Here's how the Model, View, and Controller map to those concerns, with
39examples of well-known Perl modules you may want to use for each.
40
41=over 4
42
43=item * B<Model>
44
45Access and modify content (data). L<DBIx::Class>, L<Class::DBI>,
46L<Xapian>, L<Net::LDAP>...
47
48=item * B<View>
49
50Present content to the user. L<Template Toolkit|Template>,
51L<Mason|HTML::Mason>, L<HTML::Template>...
52
53=item * B<Controller>
54
55Control the whole request phase, check parameters, dispatch actions, flow
56control. Catalyst itself!
57
58=back
59
60If you're unfamiliar with MVC and design patterns, you may want to
61check out the original book on the subject, I<Design Patterns>, by
62Gamma, Helm, Johnson, and Vlissides, also known as the Gang of Four
63(GoF). Many, many web application frameworks are based on MVC, which
64is becoming a popular design paradigm for the world wide web.
65
66=head3 Flexibility
67
68Catalyst is much more flexible than many other frameworks. Rest assured
69you can use your favorite Perl modules with Catalyst.
70
71=over 4
72
73=item * B<Multiple Models, Views, and Controllers>
74
75To build a Catalyst application, you handle each type of concern inside
76special modules called L</Components>. Often this code will be very
77simple, just calling out to Perl modules like those listed above under
78L</MVC>. Catalyst handles these components in a very flexible way. Use
79as many Models, Views, and Controllers as you like, using as many
80different Perl modules as you like, all in the same application. Want to
81manipulate multiple databases, and retrieve some data via LDAP? No
82problem. Want to present data from the same Model using L<Template
83Toolkit|Template> and L<PDF::Template>? Easy.
84
85=item * B<Reuseable Components>
86
87Not only does Catalyst promote the re-use of already existing Perl
88modules, it also allows you to re-use your Catalyst components in
89multiple Catalyst applications.
90
91=item * B<Unrestrained URL-to-Action Dispatching>
92
93Catalyst allows you to dispatch any URLs to any application L</Actions>,
94even through regular expressions! Unlike most other frameworks, it
95doesn't require mod_rewrite or class and method names in URLs.
96
97With Catalyst you register your actions and address them directly. For
98example:
99
a8df13c3 100 sub hello : Local {
cb93c9d7 101 my ( $self, $context ) = @_;
102 $context->response->body('Hello World!');
103 }
104
105Now http://localhost:3000/hello prints "Hello World!".
106
54c2daad 107Note that actions with the C< :Global > attribute are equivalent to
a8df13c3 108using a C<:Path('action_name') > attribute, so our action could be
109equivalently:
4299d9f5 110
a8df13c3 111 sub hi : Path('hello') {
4299d9f5 112 my ( $self, $context ) = @_;
113 $context->response->body('Hello World!');
114 }
115
116
cb93c9d7 117=item * B<Support for CGI, mod_perl, Apache::Request, FastCGI>
118
492f2dd5 119Use L<Catalyst::Engine::Apache> or L<Catalyst::Engine::CGI>. Another
120interesting engine is L<Catalyst::Engine::HTTP::Prefork> - available from CPAN
121separately - which will turn the built server into a fully fledged production
122ready server (although you'll probably want to run it behind a front end proxy
123if you end up using it).
cb93c9d7 124
125=back
126
127=head3 Simplicity
128
129The best part is that Catalyst implements all this flexibility in a very
130simple way.
131
132=over 4
133
134=item * B<Building Block Interface>
135
136Components interoperate very smoothly. For example, Catalyst
137automatically makes a L</Context> object available to every
138component. Via the context, you can access the request object, share
139data between components, and control the flow of your
140application. Building a Catalyst application feels a lot like snapping
141together toy building blocks, and everything just works.
142
143=item * B<Component Auto-Discovery>
144
145No need to C<use> all of your components. Catalyst automatically finds
146and loads them.
147
148=item * B<Pre-Built Components for Popular Modules>
149
150See L<Catalyst::Model::DBIC::Schema> for L<DBIx::Class>, or
151L<Catalyst::View::TT> for L<Template Toolkit|Template>.
152
153=item * B<Built-in Test Framework>
154
155Catalyst comes with a built-in, lightweight http server and test
156framework, making it easy to test applications from the web browser,
157and the command line.
158
159=item * B<Helper Scripts>
160
161Catalyst provides helper scripts to quickly generate running starter
162code for components and unit tests. Install L<Catalyst::Devel> and see
163L<Catalyst::Helper>.
164
165=back
166
167=head2 Quickstart
168
169Here's how to install Catalyst and get a simple application up and
170running, using the helper scripts described above.
171
172=head3 Install
173
0c51850e 174Installation of Catalyst can be a time-consuming effort, due to its
175large number of dependencies. Although most of the frustrations
176associated with this are now ironed out and a simple C<cpan
177Catalyst::Devel> or C<cpan Catalyst::Runtime> are now usually
178straightforward, if you still have problems, you can use use Matt
179Trout's C<cat-install> script, from
180L<http://www.shadowcatsystems.co.uk/static/cat-install>, and then
181install L<Catalyst::Devel>.
cb93c9d7 182
183 # perl cat-install
184 # perl -MCPAN -e 'install Catalyst::Devel'
185
186=head3 Setup
187
188 $ catalyst.pl MyApp
189 # output omitted
190 $ cd MyApp
191 $ script/myapp_create.pl controller Library::Login
192
0c51850e 193=head4 Frank Speiser's Amazon EC2 Catalyst SDK
194
195There are currently two flavors of publicly available Amazon Machine
196Images (AMI) that include all the elements you'd need to begin
197developing in a fully functional Catalyst environment within
198minutes. See
199L<Catalyst::Manual::Installation|Catalyst::Manual::Installation> for
200more details.
201
202
cb93c9d7 203=head3 Run
204
205 $ script/myapp_server.pl
206
207Now visit these locations with your favorite browser or user agent to see
208Catalyst in action:
209
210(NOTE: Although we create a controller here, we don't actually use it.
211Both of these URLs should take you to the welcome page.)
212
213
214=over 4
215
216=item http://localhost:3000/
217
218=item http://localhost:3000/library/login/
219
220=back
221
222=head2 How It Works
223
224Let's see how Catalyst works, by taking a closer look at the components
225and other parts of a Catalyst application.
226
227=head3 Components
228
229Catalyst has an uncommonly flexible component system. You can define as
230many L</Models>, L</Views>, and L</Controllers> as you like. As discussed
231previously, the general idea is that the View is responsible for the
232output of data to the user (typically via a web browser, but a View can
233also generate PDFs or e-mails, for example); the Model is responsible
234for providing data (typically from a relational database); and the
235Controller is responsible for interacting with the user and deciding
236how user input determines what actions the application takes.
237
238In the world of MVC, there are frequent discussions and disagreements
239about the nature of each element - whether certain types of logic
240belong in the Model or the Controller, etc. Catalyst's flexibility
241means that this decision is entirely up to you, the programmer;
242Catalyst doesn't enforce anything. See L<Catalyst::Manual::About> for
243a general discussion of these issues.
244
b2aea8fe 245Model, View and Controller components must inherit from L<Catalyst::Model>,
47a79274 246L<Catalyst::View> and L<Catalyst::Controller>, respectively. These, in turn, inherit
b2aea8fe 247from L<Catalyst::Component> which provides a simple class structure and some
248common class methods like C<config> and C<new> (constructor).
cb93c9d7 249
250 package MyApp::Controller::Catalog;
251
252 use strict;
b2aea8fe 253 use base 'Catalyst::Controller';
cb93c9d7 254
255 __PACKAGE__->config( foo => 'bar' );
256
257 1;
258
259You don't have to C<use> or otherwise register Models, Views, and
260Controllers. Catalyst automatically discovers and instantiates them
261when you call C<setup> in the main application. All you need to do is
262put them in directories named for each Component type. You can use a
263short alias for each one.
264
265=over 4
266
267=item * B<MyApp/Model/>
268
269=item * B<MyApp/M/>
270
271=item * B<MyApp/View/>
272
273=item * B<MyApp/V/>
274
275=item * B<MyApp/Controller/>
276
277=item * B<MyApp/C/>
278
279=back
280
281In older versions of Catalyst, the recommended practice (and the one
282automatically created by helper scripts) was to name the directories
283C<M/>, C<V/>, and C<C/>. Though these still work, we now recommend
284the use of the full names.
285
286=head4 Views
287
288To show how to define views, we'll use an already-existing base class for the
289L<Template Toolkit|Template>, L<Catalyst::View::TT>. All we need to do is
290inherit from this class:
291
292 package MyApp::View::TT;
293
294 use strict;
295 use base 'Catalyst::View::TT';
296
297 1;
298
299(You can also generate this automatically by using the helper script:
300
301 script/myapp_create.pl view TT TT
302
303where the first C<TT> tells the script that the name of the view should
304be C<TT>, and the second that it should be a Template Toolkit view.)
305
306This gives us a process() method and we can now just do
307$c->forward('MyApp::View::TT') to render our templates. The base class
308makes process() implicit, so we don't have to say
309C<$c-E<gt>forward(qw/MyApp::View::TT process/)>.
310
311 sub hello : Global {
312 my ( $self, $c ) = @_;
313 $c->stash->{template} = 'hello.tt';
314 }
315
316 sub end : Private {
317 my ( $self, $c ) = @_;
318 $c->forward( $c->view('TT') );
319 }
320
321You normally render templates at the end of a request, so it's a perfect
322use for the global C<end> action.
323
324In practice, however, you would use a default C<end> action as supplied
325by L<Catalyst::Action::RenderView>.
326
327Also, be sure to put the template under the directory specified in
328C<$c-E<gt>config-E<gt>{root}>, or you'll end up looking at the debug
329screen.
330
331=head4 Models
332
333Models are providers of data. This data could come from anywhere - a
334search engine index, a spreadsheet, the file system - but typically a
335Model represents a database table. The data source does not
336intrinsically have much to do with web applications or Catalyst - it
337could just as easily be used to write an offline report generator or a
338command-line tool.
339
340To show how to define models, again we'll use an already-existing base
341class, this time for L<DBIx::Class>: L<Catalyst::Model::DBIC::Schema>.
342We'll also need L<DBIx::Class::Schema::Loader>.
343
344But first, we need a database.
345
346 -- myapp.sql
347 CREATE TABLE foo (
348 id INTEGER PRIMARY KEY,
349 data TEXT
350 );
351
352 CREATE TABLE bar (
353 id INTEGER PRIMARY KEY,
354 foo INTEGER REFERENCES foo,
355 data TEXT
356 );
357
358 INSERT INTO foo (data) VALUES ('TEST!');
359
9d49ae04 360 % sqlite3 /tmp/myapp.db < myapp.sql
cb93c9d7 361
362Now we can create a DBIC::Schema model for this database.
363
364 script/myapp_create.pl model MyModel DBIC::Schema MySchema create=static 'dbi:SQLite:/tmp/myapp.db'
365
4299d9f5 366L<DBIx::Class::Schema::Loader> can automaticall load table layouts and
367relationships, and convert them into a static schema definition
368C<MySchema>, which you can edit later.
cb93c9d7 369
370Use the stash to pass data to your templates.
371
372We add the following to MyApp/Controller/Root.pm
373
374 sub view : Global {
375 my ( $self, $c, $id ) = @_;
376
377 $c->stash->{item} = $c->model('MyModel::Foo')->find($id);
378 }
379
380 1;
381
382 sub end : Private {
383 my ( $self, $c ) = @_;
384
385 $c->stash->{template} ||= 'index.tt';
386 $c->forward( $c->view('TT') );
387 }
388
389We then create a new template file "root/index.tt" containing:
390
391 The Id's data is [% item.data %]
392
393Models do not have to be part of your Catalyst application; you
394can always call an outside module that serves as your Model:
395
396 # in a Controller
397 sub list : Local {
398 my ( $self, $c ) = @_;
399
400 $c->stash->{template} = 'list.tt';
401
402 use Some::Outside::Database::Module;
403 my @records = Some::Outside::Database::Module->search({
404 artist => 'Led Zeppelin',
405 });
406
407 $c->stash->{records} = \@records;
408 }
409
410But by using a Model that is part of your Catalyst application, you
411gain several things: you don't have to C<use> each component, Catalyst
412will find and load it automatically at compile-time; you can
413C<forward> to the module, which can only be done to Catalyst
414components. Only Catalyst components can be fetched with
415C<$c-E<gt>model('SomeModel')>.
416
417Happily, since many people have existing Model classes that they
418would like to use with Catalyst (or, conversely, they want to
419write Catalyst models that can be used outside of Catalyst, e.g.
420in a cron job), it's trivial to write a simple component in
421Catalyst that slurps in an outside Model:
422
423 package MyApp::Model::DB;
424 use base qw/Catalyst::Model::DBIC::Schema/;
425 __PACKAGE__->config(
426 schema_class => 'Some::DBIC::Schema',
427 connect_info => ['dbi:SQLite:foo.db', '', '', {AutoCommit=>1}]
428 );
429 1;
430
431and that's it! Now C<Some::DBIC::Schema> is part of your
432Cat app as C<MyApp::Model::DB>.
433
434Within Catalyst, the common approach to writing a model for your
435application is wrapping a generic model (e.g. L<DBIx::Class::Schema>, a
436bunch of XMLs, or anything really) with an object that contains
437configuration data, convenience methods, and so forth. Thus you
438will in effect have two models - a wrapper model that knows something
439about Catalyst and your web application, and a generic model that is
440totally independent of these needs.
441
442Technically, within Catalyst a model is a B<component> - an instance of
443the model's class belonging to the application. It is important to
444stress that the lifetime of these objects is per application, not per
445request.
446
447While the model base class (L<Catalyst::Model>) provides things like
448C<config> to better integrate the model into the application, sometimes
449this is not enough, and the model requires access to C<$c> itself.
450
451Situations where this need might arise include:
452
453=over 4
454
455=item *
456
457Interacting with another model
458
459=item *
460
461Using per-request data to control behavior
462
463=item *
464
465Using plugins from a Model (for example L<Catalyst::Plugin::Cache>).
466
467=back
468
469From a style perspective it's usually considered bad form to make your
470model "too smart" about things - it should worry about business logic
471and leave the integration details to the controllers. If, however, you
472find that it does not make sense at all to use an auxillary controller
473around the model, and the model's need to access C<$c> cannot be
474sidestepped, there exists a power tool called L</ACCEPT_CONTEXT>.
475
476=head4 Controllers
477
478Multiple controllers are a good way to separate logical domains of your
479application.
480
481 package MyApp::Controller::Login;
482
483 use base qw/Catalyst::Controller/;
484
485 sub login : Path("login") { }
486 sub new_password : Path("new-password") { }
487 sub logout : Path("logout") { }
488
489 package MyApp::Controller::Catalog;
490
491 use base qw/Catalyst::Controller/;
492
493 sub view : Local { }
494 sub list : Local { }
495
496 package MyApp::Controller::Cart;
497
498 use base qw/Catalyst::Controller/;
499
500 sub add : Local { }
501 sub update : Local { }
502 sub order : Local { }
503
504Note that you can also supply attributes via the Controller's config so
505long as you have at least one attribute on a subref to be exported
506(:Action is commonly used for this) - for example the following is
507equivalent to the same controller above:
508
509 package MyApp::Controller::Login;
510
511 use base qw/Catalyst::Controller/;
512
513 __PACKAGE__->config(
514 actions => {
515 'sign_in' => { Path => 'sign-in' },
516 'new_password' => { Path => 'new-password' },
517 'sign_out' => { Path => 'sign-out' },
518 },
519 );
520
521 sub sign_in : Action { }
522 sub new_password : Action { }
523 sub sign_out : Action { }
524
525=head3 ACCEPT_CONTEXT
526
527Whenever you call $c->component("Foo") you get back an object - the
528instance of the model. If the component supports the C<ACCEPT_CONTEXT>
529method instead of returning the model itself, the return value of C<<
530$model->ACCEPT_CONTEXT( $c ) >> will be used.
531
0cc6ab50 532This means that whenever your model/view/controller needs to talk to
533C<$c> it gets a chance to do this when it's needed.
cb93c9d7 534
535A typical C<ACCEPT_CONTEXT> method will either clone the model and return one
536with the context object set, or it will return a thin wrapper that contains
537C<$c> and delegates to the per-application model object.
538
0cc6ab50 539Generally it's a bad idea to expose the context object (C<$c>) in your
540model or view code. Instead you use the C<ACCEPT_CONTEXT> subroutine
541to grab the bits of the context object that you need, and provide
542accessors to them in the model. This ensures that C<$c> is only in
543scope where it is neaded which reduces maintenance and debugging
544headaches. So, if for example you needed two
545L<Catalyst::Model::DBIC::Schema> models in the same Catalyst model
546code, you might do something like this:
547
548 __PACKAGE__->mk_accessors(qw(model1_schema model2_schema));
549 sub ACCEPT_CONTEXT {
550 my ( $self, $c, @extra_arguments ) = @_;
551 $self = bless({ %$self,
552 model1_schema => $c->model('Model1')->schema,
553 model2_schema => $c->model('Model2')->schema
554 }, ref($self));
555 return $self;
556 }
557
558This effectively treats $self as a B<prototype object> that gets a new
559parameter. C<@extra_arguments> comes from any trailing arguments to
560C<< $c->component( $bah, @extra_arguments ) >> (or C<< $c->model(...)
561>>, C<< $c->view(...) >> etc).
562
563In a subroutine in the model code, we can then do this:
564
565 sub whatever {
566 my ($self) = @_;
567 my $schema1 = $self->model1_schema;
568 my $schema2 = $self->model2_schema;
569 ...
570 }
571
572Note that we still want the Catalyst models to be a thin wrapper
573around classes that will work independently of the Catalyst
574application to promote reusability of code. Here we might just want
575to grab the $c->model('DB')->schema so as to get the connection
576information from the Catalyst application's configuration for example.
577
578The life time of this value is B<per usage>, and not per request. To
579make this per request you can use the following technique:
cb93c9d7 580
581Add a field to C<$c>, like C<my_model_instance>. Then write your
582C<ACCEPT_CONTEXT> method to look like this:
583
584 sub ACCEPT_CONTEXT {
585 my ( $self, $c ) = @_;
586
587 if ( my $per_request = $c->my_model_instance ) {
588 return $per_request;
589 } else {
590 my $new_instance = bless { %$self, c => $c }, ref($self);
591 Scalar::Util::weaken($new_instance->{c}); # or we have a circular reference
592 $c->my_model_instance( $new_instance );
593 return $new_instance;
594 }
595 }
596
0cc6ab50 597For a similar technique to grab a new component instance on each
598request, see L<Catalyst::Component::InstancePerContext>.
599
cb93c9d7 600=head3 Application Class
601
602In addition to the Model, View, and Controller components, there's a
603single class that represents your application itself. This is where you
604configure your application, load plugins, and extend Catalyst.
605
606 package MyApp;
607
608 use strict;
ca7528df 609 use parent qw/Catalyst/;
b411df01 610 use Catalyst qw/-Debug ConfigLoader Static::Simple/;
cb93c9d7 611 MyApp->config(
612 name => 'My Application',
613
614 # You can put anything else you want in here:
615 my_configuration_variable => 'something',
616 );
617 1;
618
619In older versions of Catalyst, the application class was where you put
620global actions. However, as of version 5.66, the recommended practice is
621to place such actions in a special Root controller (see L</Actions>,
622below), to avoid namespace collisions.
623
624=over 4
625
626=item * B<name>
627
628The name of your application.
629
630=back
631
632Optionally, you can specify a B<root> parameter for templates and static
633data. If omitted, Catalyst will try to auto-detect the directory's
634location. You can define as many parameters as you want for plugins or
635whatever you need. You can access them anywhere in your application via
636C<$context-E<gt>config-E<gt>{$param_name}>.
637
638=head3 Context
639
640Catalyst automatically blesses a Context object into your application
641class and makes it available everywhere in your application. Use the
642Context to directly interact with Catalyst and glue your L</Components>
643together. For example, if you need to use the Context from within a
644Template Toolkit template, it's already there:
645
646 <h1>Welcome to [% c.config.name %]!</h1>
647
648As illustrated in our URL-to-Action dispatching example, the Context is
649always the second method parameter, behind the Component object
650reference or class name itself. Previously we called it C<$context> for
651clarity, but most Catalyst developers just call it C<$c>:
652
653 sub hello : Global {
654 my ( $self, $c ) = @_;
655 $c->res->body('Hello World!');
656 }
657
658The Context contains several important objects:
659
660=over 4
661
662=item * L<Catalyst::Request>
663
664 $c->request
665 $c->req # alias
666
667The request object contains all kinds of request-specific information, like
668query parameters, cookies, uploads, headers, and more.
669
670 $c->req->params->{foo};
671 $c->req->cookies->{sessionid};
672 $c->req->headers->content_type;
673 $c->req->base;
674 $c->req->uri_with( { page = $pager->next_page } );
675
676=item * L<Catalyst::Response>
677
678 $c->response
679 $c->res # alias
680
681The response is like the request, but contains just response-specific
682information.
683
684 $c->res->body('Hello World');
685 $c->res->status(404);
686 $c->res->redirect('http://oook.de');
687
688=item * L<Catalyst::Config>
689
690 $c->config
691 $c->config->{root};
692 $c->config->{name};
693
694=item * L<Catalyst::Log>
695
696 $c->log
697 $c->log->debug('Something happened');
698 $c->log->info('Something you should know');
699
700=item * B<Stash>
701
702 $c->stash
703 $c->stash->{foo} = 'bar';
704 $c->stash->{baz} = {baz => 'qox'};
705 $c->stash->{fred} = [qw/wilma pebbles/];
706
707and so on.
708
709=back
710
711The last of these, the stash, is a universal hash for sharing data among
712application components. For an example, we return to our 'hello' action:
713
714 sub hello : Global {
715 my ( $self, $c ) = @_;
716 $c->stash->{message} = 'Hello World!';
717 $c->forward('show_message');
718 }
719
720 sub show_message : Private {
721 my ( $self, $c ) = @_;
722 $c->res->body( $c->stash->{message} );
723 }
724
725Note that the stash should be used only for passing data in an
726individual request cycle; it gets cleared at a new request. If you need
727to maintain persistent data, use a session. See
728L<Catalyst::Plugin::Session> for a comprehensive set of
729Catalyst-friendly session-handling tools.
730
731=head3 Actions
732
733A Catalyst controller is defined by its actions. An action is a
734subroutine with a special attribute. You've already seen some examples
735of actions in this document. The URL (for example
736http://localhost.3000/foo/bar) consists of two parts, the base
737(http://localhost:3000/ in this example) and the path (foo/bar). Please
738note that the trailing slash after the hostname[:port] always belongs to
739base and not to the action.
740
741=over 4
742
743=item * B<Application Wide Actions>
744
745Actions which are called at the root level of the application
746(e.g. http://localhost:3000/ ) go in MyApp::Controller::Root, like
747this:
748
749 package MyApp::Controller::Root;
750 use base 'Catalyst::Controller';
751 # Sets the actions in this controller to be registered with no prefix
752 # so they function identically to actions created in MyApp.pm
753 __PACKAGE__->config->{namespace} = '';
4299d9f5 754 sub default : Path {
cb93c9d7 755 my ( $self, $context ) = @_;
4299d9f5 756 $context->response->status(404);
757 $context->response->body('404 not found');
cb93c9d7 758 }
759 1;
760
761=back
762
763=head4 Action types
764
765Catalyst supports several types of actions:
766
767=over 4
768
769=item * B<Literal> (B<Path> actions)
770
771 package MyApp::Controller::My::Controller;
772 sub bar : Path('foo/bar') { }
773
774Literal C<Path> actions will act relative to their current
775namespace. The above example matches only
776http://localhost:3000/my/controller/foo/bar. If you start your path with
777a forward slash, it will match from the root. Example:
778
779 package MyApp::Controller::My::Controller;
780 sub bar : Path('/foo/bar') { }
781
782Matches only http://localhost:3000/foo/bar.
783
784 package MyApp::Controller::My::Controller;
785 sub bar : Path { }
786
787By leaving the C<Path> definition empty, it will match on the namespace
788root. The above code matches http://localhost:3000/my/controller.
789
790=item * B<Regex>
791
792 sub bar : Regex('^item(\d+)/order(\d+)$') { }
793
794Matches any URL that matches the pattern in the action key, e.g.
795http://localhost:3000/item23/order42. The '' around the regexp is
796optional, but perltidy likes it. :)
797
798Regex matches act globally, i.e. without reference to the namespace from
799which it is called, so that a C<bar> method in the
800C<MyApp::Controller::Catalog::Order::Process> namespace won't match any
801form of C<bar>, C<Catalog>, C<Order>, or C<Process> unless you
802explicitly put this in the regex. To achieve the above, you should
803consider using a C<LocalRegex> action.
804
805=item * B<LocalRegex>
806
807 sub bar : LocalRegex('^widget(\d+)$') { }
808
809LocalRegex actions act locally. If you were to use C<bar> in
810C<MyApp::Controller::Catalog>, the above example would match urls like
811http://localhost:3000/catalog/widget23.
812
813If you omit the "C<^>" from your regex, then it will match any depth
814from the controller and not immediately off of the controller name. The
815following example differs from the above code in that it will match
816http://localhost:3000/catalog/foo/widget23 as well.
817
818 package MyApp::Controller::Catalog;
819 sub bar : LocalRegex('widget(\d+)$') { }
820
821For both LocalRegex and Regex actions, if you use capturing parentheses
822to extract values within the matching URL, those values are available in
823the C<$c-E<gt>req-E<gt>captures> array. In the above example, "widget23"
824would capture "23" in the above example, and
825C<$c-E<gt>req-E<gt>captures-E<gt>[0]> would be "23". If you want to pass
826arguments at the end of your URL, you must use regex action keys. See
827L</URL Path Handling> below.
828
829=item * B<Top-level> (B<Global>)
830
831 package MyApp::Controller::Foo;
832 sub foo : Global { }
833
834Matches http://localhost:3000/foo. The function name is mapped
835directly to the application base. You can provide an equivalent
836function in this case by doing the following:
837
838 package MyApp::Controller::Root
839 sub foo : Local { }
840
841=item * B<Namespace-Prefixed> (B<Local>)
842
843 package MyApp::Controller::My::Controller;
844 sub foo : Local { }
845
846Matches http://localhost:3000/my/controller/foo.
847
848This action type indicates that the matching URL must be prefixed with a
849modified form of the component's class (package) name. This modified
850class name excludes the parts that have a pre-defined meaning in
851Catalyst ("MyApp::Controller" in the above example), replaces "::" with
852"/", and converts the name to lower case. See L</Components> for a full
853explanation of the pre-defined meaning of Catalyst component class
854names.
855
4299d9f5 856Note that actions with the C< :Local > attribute are equivalent to the
857<:Path('action_name') > so sub foo : Local { } is equivalent to -
858
859 sub foo : Path('foo') { }
860
cb93c9d7 861=item * B<Chained>
862
863Catalyst also provides a method to build and dispatch chains of actions,
864like
865
866 sub catalog : Chained : CaptureArgs(1) {
867 my ( $self, $c, $arg ) = @_;
868 ...
869 }
870
871 sub item : Chained('catalog') : Args(1) {
872 my ( $self, $c, $arg ) = @_;
873 ...
874 }
875
876to handle a C</catalog/*/item/*> path. For further information about this
877dispatch type, please see L<Catalyst::DispatchType::Chained>.
878
879=item * B<Private>
880
881 sub foo : Private { }
882
883Matches no URL, and cannot be executed by requesting a URL that
09f13e1d 884corresponds to the action key. Catalyst's :Private attribute is
885exclusive and doesn't work with other attributes (so will not work
886combined with Path or Chained attributes). With the exception of the
887C< index >, C< auto > and C< default > actions, Private actions can
888only be executed from inside a Catalyst application, by calling the
889C<forward> or C<detach> methods:
cb93c9d7 890
891 $c->forward('foo');
09f13e1d 892 # or
893 $c->detach('foo');
cb93c9d7 894
895See L</Flow Control> for a full explanation of C<forward>. Note that, as
896discussed there, when forwarding from another component, you must use
897the absolute path to the method, so that a private C<bar> method in your
898C<MyApp::Controller::Catalog::Order::Process> controller must, if called
899from elsewhere, be reached with
900C<$c-E<gt>forward('/catalog/order/process/bar')>.
901
902=item * B<Args>
903
904Args is not an action type per se, but an action modifier - it adds a
905match restriction to any action it's provided to, requiring only as many
906path parts as are specified for the action to be valid - for example in
907MyApp::Controller::Foo,
908
909 sub bar :Local
910
911would match any URL starting /foo/bar/. To restrict this you can do
912
913 sub bar :Local :Args(1)
914
915to only match /foo/bar/*/
916
917=back
918
919B<Note:> After seeing these examples, you probably wonder what the point
920is of defining names for regex and path actions. Every public action is
921also a private one, so you have one unified way of addressing components
922in your C<forward>s.
923
924=head4 Built-in Private Actions
925
926In response to specific application states, Catalyst will automatically
927call these built-in private actions in your application class:
928
929=over 4
930
4299d9f5 931=item * B<default : Path>
cb93c9d7 932
933Called when no other action matches. Could be used, for example, for
934displaying a generic frontpage for the main app, or an error page for
955bdf3d 935individual controllers. B<Note>: in older Catalyst applications you
936will see C<default : Private> which is roughly speaking equivalent.
cb93c9d7 937
cb93c9d7 938
4299d9f5 939=item * B<index : Path : Args (0) >
cb93c9d7 940
4299d9f5 941C<index> is much like C<default> except that it takes no arguments and
942it is weighted slightly higher in the matching process. It is useful
943as a static entry point to a controller, e.g. to have a static welcome
944page. Note that it's also weighted higher than Path. Actually the sub
945name C<index> can be called anything you want. The sub attributes are
955bdf3d 946what determines the behaviour of the action. B<Note>: in older
947Catalyst applications, you will see C<index : Private> used, which is
948roughly speaking equivalent.
cb93c9d7 949
950=item * B<begin : Private>
951
952Called at the beginning of a request, before any matching actions are
953called.
954
955=item * B<end : Private>
956
957Called at the end of a request, after all matching actions are called.
958
959=back
960
961=head4 Built-in actions in controllers/autochaining
962
f76813a2 963 package MyApp::Controller::Foo;
cb93c9d7 964 sub begin : Private { }
4299d9f5 965 sub default : Path { }
cb93c9d7 966 sub auto : Private { }
967
968You can define built-in private actions within your controllers as
969well. The actions will override the ones in less-specific controllers,
970or your application class. In other words, for each of the three
971built-in private actions, only one will be run in any request
972cycle. Thus, if C<MyApp::Controller::Catalog::begin> exists, it will be
973run in place of C<MyApp::begin> if you're in the C<catalog> namespace,
974and C<MyApp::Controller::Catalog::Order::begin> would override this in
975turn.
976
977=over 4
978
979=item * B<auto : Private>
980
981In addition to the normal built-in actions, you have a special action
982for making chains, C<auto>. Such C<auto> actions will be run after any
983C<begin>, but before your action is processed. Unlike the other
984built-ins, C<auto> actions I<do not> override each other; they will be
985called in turn, starting with the application class and going through to
986the I<most> specific class. I<This is the reverse of the order in which
987the normal built-ins override each other>.
988
989=back
990
991Here are some examples of the order in which the various built-ins
992would be called:
993
994=over 4
995
996=item for a request for C</foo/foo>
997
f76813a2 998 MyApp::Controller::Foo::auto
cb93c9d7 999 MyApp::Controller::Foo::default # in the absence of MyApp::Controller::Foo::Foo
f76813a2 1000 MyApp::Controller::Foo::end
cb93c9d7 1001
1002=item for a request for C</foo/bar/foo>
1003
1004 MyApp::Controller::Foo::Bar::begin
cb93c9d7 1005 MyApp::Controller::Foo::auto
1006 MyApp::Controller::Foo::Bar::auto
1007 MyApp::Controller::Foo::Bar::default # for MyApp::Controller::Foo::Bar::foo
1008 MyApp::Controller::Foo::Bar::end
1009
1010=back
1011
1012The C<auto> action is also distinguished by the fact that you can break
1013out of the processing chain by returning 0. If an C<auto> action returns
10140, any remaining actions will be skipped, except for C<end>. So, for the
1015request above, if the first auto returns false, the chain would look
1016like this:
1017
1018=over 4
1019
1020=item for a request for C</foo/bar/foo> where first C<auto> returns
1021false
1022
1023 MyApp::Controller::Foo::Bar::begin
cb93c9d7 1024 MyApp::Controller::Foo::Bar::end
1025
1026=back
1027
1028An example of why one might use this is an authentication action: you
1029could set up a C<auto> action to handle authentication in your
1030application class (which will always be called first), and if
1031authentication fails, returning 0 would skip any remaining methods
1032for that URL.
1033
1034B<Note:> Looking at it another way, C<auto> actions have to return a
1035true value to continue processing! You can also C<die> in the auto
1036action; in that case, the request will go straight to the finalize
1037stage, without processing further actions.
1038
1039=head4 URL Path Handling
1040
1041You can pass variable arguments as part of the URL path, separated with
1042forward slashes (/). If the action is a Regex or LocalRegex, the '$' anchor
1043must be used. For example, suppose you want to handle C</foo/$bar/$baz>,
1044where C<$bar> and C<$baz> may vary:
1045
1046 sub foo : Regex('^foo$') { my ($self, $context, $bar, $baz) = @_; }
1047
1048But what if you also defined actions for C</foo/boo> and C</foo/boo/hoo>?
1049
1050 sub boo : Path('foo/boo') { .. }
1051 sub hoo : Path('foo/boo/hoo') { .. }
1052
1053Catalyst matches actions in most specific to least specific order:
1054
1055 /foo/boo/hoo
1056 /foo/boo
1057 /foo # might be /foo/bar/baz but won't be /foo/boo/hoo
1058
1059So Catalyst would never mistakenly dispatch the first two URLs to the
1060'^foo$' action.
1061
1062If a Regex or LocalRegex action doesn't use the '$' anchor, the action will
1063still match a URL containing arguments, however the arguments won't be
1064available via C<@_>.
1065
1066=head4 Parameter Processing
1067
1068Parameters passed in the URL query string are handled with methods in
1069the L<Catalyst::Request> class. The C<param> method is functionally
1070equivalent to the C<param> method of C<CGI.pm> and can be used in
1071modules that require this.
1072
1073 # http://localhost:3000/catalog/view/?category=hardware&page=3
1074 my $category = $c->req->param('category');
1075 my $current_page = $c->req->param('page') || 1;
1076
1077 # multiple values for single parameter name
1078 my @values = $c->req->param('scrolling_list');
1079
1080 # DFV requires a CGI.pm-like input hash
1081 my $results = Data::FormValidator->check($c->req->params, \%dfv_profile);
1082
1083=head3 Flow Control
1084
1085You control the application flow with the C<forward> method, which
1086accepts the key of an action to execute. This can be an action in the
1087same or another Catalyst controller, or a Class name, optionally
1088followed by a method name. After a C<forward>, the control flow will
1089return to the method from which the C<forward> was issued.
1090
1091A C<forward> is similar to a method call. The main differences are that
1092it wraps the call in an C<eval> to allow exception handling; it
1093automatically passes along the context object (C<$c> or C<$context>);
1094and it allows profiling of each call (displayed in the log with
1095debugging enabled).
1096
1097 sub hello : Global {
1098 my ( $self, $c ) = @_;
1099 $c->stash->{message} = 'Hello World!';
1100 $c->forward('check_message'); # $c is automatically included
1101 }
1102
1103 sub check_message : Private {
1104 my ( $self, $c ) = @_;
1105 return unless $c->stash->{message};
1106 $c->forward('show_message');
1107 }
1108
1109 sub show_message : Private {
1110 my ( $self, $c ) = @_;
1111 $c->res->body( $c->stash->{message} );
1112 }
1113
1114A C<forward> does not create a new request, so your request object
1115(C<$c-E<gt>req>) will remain unchanged. This is a key difference between
1116using C<forward> and issuing a redirect.
1117
1118You can pass new arguments to a C<forward> by adding them
1119in an anonymous array. In this case C<$c-E<gt>req-E<gt>args>
1120will be changed for the duration of the C<forward> only; upon
1121return, the original value of C<$c-E<gt>req-E<gt>args> will
1122be reset.
1123
1124 sub hello : Global {
1125 my ( $self, $c ) = @_;
1126 $c->stash->{message} = 'Hello World!';
1127 $c->forward('check_message',[qw/test1/]);
1128 # now $c->req->args is back to what it was before
1129 }
1130
1131 sub check_message : Private {
1132 my ( $self, $c ) = @_;
1133 my $first_argument = $c->req->args->[0]; # now = 'test1'
1134 # do something...
1135 }
1136
1137As you can see from these examples, you can just use the method name as
1138long as you are referring to methods in the same controller. If you want
1139to forward to a method in another controller, or the main application,
1140you will have to refer to the method by absolute path.
1141
1142 $c->forward('/my/controller/action');
1143 $c->forward('/default'); # calls default in main application
1144
1145Here are some examples of how to forward to classes and methods.
1146
1147 sub hello : Global {
1148 my ( $self, $c ) = @_;
1149 $c->forward(qw/MyApp::Model::Hello say_hello/);
1150 }
1151
1152 sub bye : Global {
1153 my ( $self, $c ) = @_;
1154 $c->forward('MyApp::Model::Hello'); # no method: will try 'process'
1155 }
1156
1157 package MyApp::Model::Hello;
1158
1159 sub say_hello {
1160 my ( $self, $c ) = @_;
1161 $c->res->body('Hello World!');
1162 }
1163
1164 sub process {
1165 my ( $self, $c ) = @_;
1166 $c->res->body('Goodbye World!');
1167 }
1168
1169Note that C<forward> returns to the calling action and continues
1170processing after the action finishes. If you want all further processing
1171in the calling action to stop, use C<detach> instead, which will execute
1172the C<detach>ed action and not return to the calling sub. In both cases,
1173Catalyst will automatically try to call process() if you omit the
1174method.
1175
1176
1177=head3 Testing
1178
1179Catalyst has a built-in http server for testing or local
1180deployment. (Later, you can easily use a more powerful server, for
1181example Apache/mod_perl or FastCGI, in a production environment.)
1182
1183Start your application on the command line...
1184
1185 script/myapp_server.pl
1186
1187...then visit http://localhost:3000/ in a browser to view the output.
1188
1189You can also do it all from the command line:
1190
1191 script/myapp_test.pl http://localhost/
1192
1193Catalyst has a number of tools for actual regression testing of
1194applications. The helper scripts will automatically generate basic tests
1195that can be extended as you develop your project. To write your own
1196comprehensive test scripts, L<Test::WWW::Mechanize::Catalyst> is an
1197invaluable tool.
1198
1199For more testing ideas, see L<Catalyst::Manual::Tutorial::Testing>.
1200
1201Have fun!
1202
1203=head1 SEE ALSO
1204
1205=over 4
1206
1207=item * L<Catalyst::Manual::About>
1208
1209=item * L<Catalyst::Manual::Tutorial>
1210
1211=item * L<Catalyst>
1212
1213=back
1214
1215=head1 SUPPORT
1216
1217IRC:
1218
1219 Join #catalyst on irc.perl.org.
1220 Join #catalyst-dev on irc.perl.org to help with development.
1221
1222Mailing lists:
1223
392906f2 1224 http://lists.scsys.co.uk/mailman/listinfo/catalyst
1225 http://lists.scsys.co.uk/mailman/listinfo/catalyst-dev
cb93c9d7 1226
fed95b6c 1227Wiki:
1228
1229 http://dev.catalystframework.org/wiki
1230
1231FAQ:
1232
1233 http://dev.catalystframework.org/wiki/faq
1234
cb93c9d7 1235=head1 AUTHOR
1236
1237Sebastian Riedel, C<sri@oook.de>
1238David Naughton, C<naughton@umn.edu>
1239Marcus Ramberg, C<mramberg@cpan.org>
1240Jesse Sheidlower, C<jester@panix.com>
1241Danijel Milicevic, C<me@danijel.de>
1242Kieren Diment, C<kd@totaldatasolution.com>
1243Yuval Kogman, C<nothingmuch@woobling.org>
1244
1245=head1 COPYRIGHT
1246
1247This program is free software. You can redistribute it and/or modify it
1248under the same terms as Perl itself.