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