ktats****@users*****
ktats****@users*****
2012年 9月 27日 (木) 23:28:07 JST
Index: docs/articles/www.perl.com/pub/2005/06/02/catalyst.html
diff -u docs/articles/www.perl.com/pub/2005/06/02/catalyst.html:1.2 docs/articles/www.perl.com/pub/2005/06/02/catalyst.html:1.3
--- docs/articles/www.perl.com/pub/2005/06/02/catalyst.html:1.2 Thu Sep 27 23:18:20 2012
+++ docs/articles/www.perl.com/pub/2005/06/02/catalyst.html Thu Sep 27 23:28:06 2012
@@ -18,6 +18,7 @@
<ul>
<li> <a href="#4">スピード</a></li>
<li> <a href="#5">簡易性</a></li>
+
<li> <a href="#6">柔軟性</a></li>
</ul>
<li> <a href="#7">サンプルアプリケーション: 30è¡Œã®ã‚³ãƒ¼ãƒ‰ã§ã€MiniMojo, Ajax-Based Wiki</a></li>
@@ -189,12 +190,12 @@
次ã®ã‚ˆã†ã«ã—ã¾ã™:
</p>
-<pre class=code><code>use Catalyst qw/Email Prototype Textile/;</code></pre>
-<p>will load <code>Catalyst::Plugin::Email</code>, <code>Catalyst::Plugin::Prototype</code>,
+<pre class="prettyprint"><code>use Catalyst qw/Email Prototype Textile/;</code></pre>
+<p class="original">will load <code>Catalyst::Plugin::Email</code>, <code>Catalyst::Plugin::Prototype</code>,
and <code>Catalyst::Plugin::Textile</code> in one shot.</p>
-<p><code>Catalyst::Plugin::Email</code>, <code>Catalyst::Plugin::Prototype</code>,
- and <code>Catalyst::Plugin::Textile</code>を一回ã§ãƒãƒ¼ãƒ‰ã—ã¾ã™ã€‚</p>
+<p><code>Catalyst::Plugin::Email</code>ã¨<code>Catalyst::Plugin::Prototype</code>ã¨
+ ã¨<code>Catalyst::Plugin::Textile</code>を一回ã§ãƒãƒ¼ãƒ‰ã—ã¾ã™ã€‚</p>
<p><em>開発</em></p>
<p class="original">Catalyst comes with a built-in lightweight HTTP server for development purposes.
@@ -229,7 +230,7 @@
<code>Catalyst::Log</code> クラスã§ãƒã‚®ãƒ³ã‚°ã‚’å‹•ã‹ã—ã¦ã„ã¾ã™;
デãƒãƒƒã‚®ãƒ³ã‚°ã®ãŸã‚や目的ã®æƒ…å ±ã‚’å¾—ã‚‹ãŸã‚ã«ã€ä»¥ä¸‹ã®ã‚ˆã†ãªè¡Œã‚’è¿½åŠ ã™ã‚‹ã“ã¨ã§ã€ã©ã‚“ãªã‚¢ã‚¯ã‚·ãƒ§ãƒ³ã‚‚記録ã§ãã¾ã™ã€‚
-<pre class=code><code>$c->log->info("We made it past the for loop");
+<pre class="prettyprint"><code>$c->log->info("We made it past the for loop");
$c->log->debug( $sql_query );</code></pre>
<p><img src="http://www.perl.com/2005/06/02/graphics/log-screenshot.gif" alt="Log screenshot" height="411" width="515"><br>
<em>Figure 1. Logging</em></p>
@@ -300,7 +301,7 @@
URLã¨ã‚¢ã‚¯ã‚·ãƒ§ãƒ³ã®ãƒžãƒƒãƒ”ングã«ã¯è¤‡æ•°ã®ã‚„ã‚Šã‹ãŸãŒã‚ã‚Šã¾ã™(that is, a Catalyst method)。
ã‚ãªãŸãŒã©ã†ã—ãŸã„ã‹ã«ä¾ã‚Šã¾ã™ã€‚ã¾ãšã€æ–‡å—ã©ãŠã‚Šã®ãƒ‡ã‚£ã‚¹ãƒ‘ッãƒã€ç‰¹å®šã®ãƒ‘スã«ãƒžãƒƒãƒã™ã‚‹ã‚‚ã®ã¯:
-<pre class=code><code>package MyApp::C::Quux;
+<pre class="prettyprint"><code>package MyApp::C::Quux;
# http://localhost:3000/foo/bar/yada ã ã‘ã«ãƒžãƒƒãƒ
sub baz : Path('foo/bar/yada') { }</code></pre>
@@ -310,7 +311,7 @@
<p>トップレベルã€ã¾ãŸã¯ã€ã‚°ãƒãƒ¼ãƒãƒ«ã¯ã€ã‚¢ãƒ—リケーションベースã§ãƒ¡ã‚½ãƒƒãƒ‰åã«ç›´æŽ¥ãƒžãƒƒãƒã—ã¾ã™:</p>
-<pre class=code><code>package MyApp::C::Foo;
+<pre class="prettyprint"><code>package MyApp::C::Foo;
# http://localhost:3000/bar ã«ã®ã¿ãƒžãƒƒãƒ
sub bar : Global { }</code></pre>
@@ -322,7 +323,7 @@
Controllerクラスã®åå‰ã‹ã‚‰ç”±æ¥ã™ã‚‹åå‰ç©ºé–“ã§ã®ã¿å‹•ãã¾ã™ã€‚
</p>
-<pre class=code><code>package MyApp::C::Catalog::Product;
+<pre class="prettyprint"><code>package MyApp::C::Catalog::Product;
# http://localhost:3000/catalog/product/buy ã«ãƒžãƒƒãƒ
sub buy : Local { }
@@ -343,7 +344,7 @@
マッãƒã—ãŸå€¤ã¯ã€<code>$c->request->snippets</code>ã®é…列ã‹ã‚‰åˆ©ç”¨ã§ãã¾ã™ã€‚
</p>
-<pre class=code><code>package MyApp::C::Catalog;
+<pre class="prettyprint"><code>package MyApp::C::Catalog;
# http://localhost:3000/item23/order189 ã«ãƒžãƒƒãƒ
sub bar : Regex('^item(\d+)/order(\d+)$') {
@@ -358,7 +359,7 @@
<p>æ£è¦è¡¨ç¾ã¯ã‚°ãƒãƒ¼ãƒãƒ«ã«å‹•ãã¾ã™; åå‰ç©ºé–“ã§ã®ã¿å‹•ã‹ã—ãŸã‘ã‚Œã°ã€æ£è¦è¡¨ç¾ã«åå‰ç©ºé–“ã®åå‰ã‚’使ã£ã¦ãã ã•ã„:</p>
-<pre class=code><code>sub foo : Regex('^catalog/item(\d+)$') { # ...</code></pre>
+<pre class="prettyprint"><code>sub foo : Regex('^catalog/item(\d+)$') { # ...</code></pre>
<p class="original">Finally, you can have private methods, which are never available through URLs.
You can only reach them from within the application, with a namespace-prefixed
@@ -368,7 +369,7 @@
アプリケーション内ã‹ã‚‰ã®ã¿ã€namespace-prefixed ãªãƒ‘スã§ä½¿ã†ã“ã¨ãŒã§ãã¾ã™:
</p>
-<pre class=code><code>package MyApp::C::Foo;
+<pre class="prettyprint"><code>package MyApp::C::Foo;
# matches nothing, and is only available via $c->forward('/foo/bar').
sub bar : Private { }</code></pre>
@@ -392,7 +393,7 @@
ãŒç›´æŽ¥ã«åˆ©ç”¨å¯èƒ½ã§ã™. <code>stash</code> ã¯ã€ãƒ¦ãƒ‹ãƒãƒ¼ã‚µãƒ«ãªãƒãƒƒã‚·ãƒ¥ã§ã€
アプリケーションã®ã‚³ãƒ³ãƒãƒ¼ãƒãƒ³ãƒˆã§ãƒ‡ãƒ¼ã‚¿ã‚’共有ã™ã‚‹ãŸã‚ã®ã‚‚ã®ã§ã™:</p>
-<pre class=code><code>$c->stash->{error_message} = "You must select an entry";
+<pre class="prettyprint"><code>$c->stash->{error_message} = "You must select an entry";
# TT ã®ãƒ†ãƒ³ãƒ—レートã§:
[% IF error_message %]
@@ -404,13 +405,13 @@
<p>Stash ã®å€¤ã¯ãƒ†ãƒ³ãƒ—レートã«ç›´æŽ¥ã«å…¥ã‚Šã¾ã™ã€‚ ã§ã™ãŒã€å…¨ã¦ã®ã‚³ãƒ³ãƒ†ã‚ストオブジェクトもã¾ãŸåˆ©ç”¨å¯èƒ½ã§ã™:</p>
-<pre class=code><code><h1>[% c.config.name %]</h1></code></pre>
+<pre class="prettyprint"><code><h1>[% c.config.name %]</h1></code></pre>
<p class="original">To show a Mason example, if you want to use <code>Catalyst::View::Mason</code>:</p>
<p>Masonã®ä¾‹ã‚’見るãŸã‚ã«, <code>Catalyst::View::Mason</code>ãŒæ¬²ã—ã‘ã‚Œã°:</p>
-<pre class=code><code>% foreach my $k (keys $c->req->params) {
+<pre class="prettyprint"><code>% foreach my $k (keys $c->req->params) {
param: <% $k %>: value: <% $c->req->params->{$k} %>
% }</code></pre>
@@ -480,7 +481,7 @@
<p>ã“ã®ã‚³ãƒžãƒ³ãƒ‰ã‚’実行:</p>
-<pre class=code><code>$ catalyst.pl MiniMojo
+<pre class="prettyprint"><code>$ catalyst.pl MiniMojo
$ cd MiniMojo</code></pre>
<p class="original">You've just created the skeleton for your entire application, complete with
@@ -495,7 +496,7 @@
<p>ビルトインサーãƒã®èµ·å‹•:</p>
-<pre class=code><code>$ script/minimojo_server.pl</code></pre>
+<pre class="prettyprint"><code>$ script/minimojo_server.pl</code></pre>
<p class="original">MiniMojo is already running, though it isn't doing much
just yet. (You should have received a web page consisting solely
@@ -519,7 +520,7 @@
<p>プライベートãª<code>end</code> アクションをアプリケーションクラスã€<em>lib/MiniMojo.pm</em>ã«è¿½åŠ ã—ã¾ã™ã€‚
ãã®æ–°ã—ã„ファイルを編集ã—ã¾ã™:</p>
-<pre class=code><code>sub end : Private {
+<pre class="prettyprint"><code>sub end : Private {
my ( $self, $c ) = @_;
$c->forward('MiniMojo::V::TT') unless $c->res->output;
}</code></pre>
@@ -542,7 +543,7 @@
<p>ヘルパースクリプトãŒä½œã£ãŸ アプリケーションクラスã®<code>default</code>アクションを置ãæ›ãˆã¾ã™:</p>
-<pre class=code><code>sub default : Private {
+<pre class="prettyprint"><code>sub default : Private {
my ( $self, $c ) = @_;
$c->forward('/page/show');
}</code></pre>
@@ -578,7 +579,7 @@
<p>次ã«ã€<em>minimojo.sql</em>ã¨ã„ã†ãƒ•ã‚¡ã‚¤ãƒ«ã‚’作りã¾ã™ã€‚
SQLiteã«<code>page</code>テーブルをセットアップã™ã‚‹SQLã§ã™ã€‚</p>
-<pre class=code><code>-- minimojo.sql
+<pre class="prettyprint"><code>-- minimojo.sql
CREATE TABLE page (
id INTEGER PRIMARY KEY,
title TEXT,
@@ -590,7 +591,7 @@
<p>ã“ã‚Œã‹ã‚‰ã€ãƒ‡ãƒ¼ã‚¿ãƒ™ãƒ¼ã‚¹ã‚’作æˆã—ã¾ã™ã€‚<code>sqlite</code>コマンドラインプãƒã‚°ãƒ©ãƒ を使ã„ã¾ã™:</p>
-<pre class=code><code>$ sqlite minimojo.db < minimojo.sql</code></pre>
+<pre class="prettyprint"><code>$ sqlite minimojo.db < minimojo.sql</code></pre>
<p class="original">Depending on your setup, it might be necessary to call this as <code>sqlite3</code>.</p>
@@ -600,9 +601,9 @@
<p>ヘルパースクリプトã§Modelクラスã¨åŸºæœ¬ã®ãƒ¦ãƒ‹ãƒƒãƒˆãƒ†ã‚¹ãƒˆã‚’作りã¾ã™(Figure 3ã«çµæžœãŒã‚ã‚Šã¾ã™):</p>
-<pre class=code><code>$ script/minimojo_create.pl model CDBI CDBI dbi:SQLite:/path/to/minimojo.db</code></pre>
+<pre>$ script/minimojo_create.pl model CDBI CDBI dbi:SQLite:/path/to/minimojo.db</pre>
-<p><img src="http://www.perl.com/2005/06/02/graphics/model-create-screenshot.gif" alt="Model-creation screenshot" height="372" width="515"><br><em>Figure 3. Creating the model</em></p>
+<p><img src="http://www.perl.com/2005/06/02/graphics/model-create-screenshot.gif" height="372" width="515" alt="Model-creation screenshot"><br><em>Figure 3. Creating the model</em></p>
<p class="original">The <em>minimojo_create.pl</em> script is a helper that uses Template
Toolkit to automate the creation of particular modules. The previous command
@@ -631,7 +632,7 @@
<p>ヘルパースクリプトã«ã‚ˆã‚‹Viewクラスã®ä½œæˆ:</p>
-<pre class=code><code>$ script/minimojo_create.pl view TT TT</code></pre>
+<pre class="prettyprint"><code>$ script/minimojo_create.pl view TT TT</code></pre>
<p class="original">View classes go into <em>lib/MiniMojo/V/</em>.</p>
@@ -643,7 +644,7 @@
<p>ヘルパースクリプトã«ã‚ˆã‚Š<code>Page</code>Controllerクラスを作りã¾ã™:</p>
-<pre class=code><code>$ script/minimojo_create.pl controller Page</code></pre>
+<pre class="prettyprint"><code>$ script/minimojo_create.pl controller Page</code></pre>
<p class="original">Controller classes live in <em>lib/MiniMojo/C/</em>.</p>
@@ -653,7 +654,7 @@
<p><em>lib/MiniMojo/C/Page.pm</em>ã«<code>show</code>ã‚¢ã‚¯ã‚·ãƒ§ãƒ³ã‚’è¿½åŠ ã—ã¾ã™:</p>
-<pre class=code><code>sub show : Regex('^(\w+)\.html$') {
+<pre class="prettyprint"><code>sub show : Regex('^(\w+)\.html$') {
my ( $self, $c ) = @_;
$c->stash->{template} = 'view.tt';
# $c->forward('page');
@@ -684,7 +685,7 @@
<p><em>root/view.tt</em>を作りã¾ã™:</p>
-<pre class=code><code><html>
+<pre class="prettyprint"><code><html>
<head><title>MiniMojo</title></head>
<body>
<h1>MiniMojo is set up!</h1>
@@ -713,7 +714,7 @@
<p><code>Prototype</code> 㨠<code>Textile</code> プラグインを使ã†ãŸã‚ã«ã€
アプリケーションクラスã®<em>lib/MiniMojo.pm</em>を変更ã—ã¾ã—ょã†:</p>
-<pre class=code><code>use Catalyst qw/-Debug Prototype Textile/;</code></pre>
+<pre class="prettyprint"><code>use Catalyst qw/-Debug Prototype Textile/;</code></pre>
<p class="original">
Note that you can use the plugins by specifying their base names; Catalyst
@@ -731,7 +732,7 @@
ページViewã¨ã€ç·¨é›†ã®ã‚³ãƒ¼ãƒ‰ã‚’è¿½åŠ ã—ã¾ã™:</p>
-<pre class=code><code>sub page : Private {
+<pre class="prettyprint"><code>sub page : Private {
my ( $self, $c, $title ) = @_;
$title ||= $c->req->snippets->[0] || 'Frontpage';
my $query = { title => $title };
@@ -759,7 +760,7 @@
<p><code>show</code>アクションä¸ã®<code>$c->forward('page');</code>をコメントを外ã—ã¾ã™ã€‚</p>
-<pre class=code><code>sub edit : Local {
+<pre class="prettyprint"><code>sub edit : Local {
my ( $self, $c, $title ) = @_;
$c->forward('page');
$c->stash->{page}->body( $c->req->params->{body} )
@@ -803,7 +804,7 @@
<p><em>root/view.tt</em> を変更ã—ã€Ajax codeã‚’å«ã‚ã¾ã™:</p>
-<pre class=code><code><html>
+<pre class="prettyprint"><code><html>
<head><title>MiniMojo</title></head>
[% c.prototype.define_javascript_functions %]
[% url = base _ 'page/edit/' _ page.title %]
@@ -821,7 +822,7 @@
<p>ãã®è¡Œ:</p>
-<pre class=code><code>[% c.prototype.define_javascript_functions %]</code></pre>
+<pre class="prettyprint"><code>[% c.prototype.define_javascript_functions %]</code></pre>
<p class="original">includes the whole <em>prototype.js</em> library in a <code>script</code>
block. Note that the <code>prototype</code> plugin is available in the context
@@ -832,7 +833,7 @@
<p>セクション</p>
-<pre class=code><code>[% url = base _ 'page/edit/' _ page.title %]
+<pre class="prettyprint"><code>[% url = base _ 'page/edit/' _ page.title %]
<body Onload="new Ajax.Updater( 'view', '[% url %]' )">
<h1>[% page.title %]</h1>
<div id="view"></div></code></pre>
@@ -844,14 +845,14 @@
<p>最後ã«:</p>
-<pre class=code><code><textarea id="editor" rows="24" cols="80">[% page.body %]</textarea>
+<pre class="prettyprint"><code><textarea id="editor" rows="24" cols="80">[% page.body %]</textarea>
[% c.prototype.observe_field( 'editor', {
url => url,
with => "'body='+value",
update => 'view' }
) %]</code></pre>
-<p>periodically checks the <code>textarea</code> for changes and makes an Ajax
+<p class="original">periodically checks the <code>textarea</code> for changes and makes an Ajax
request on demand.</p>
<p>定期的㫠<code>textarea</code> ã‚’ã€å¤‰æ›´ãŒã‚ã‚‹ã‹ãƒã‚§ãƒƒã‚¯ã—ã€ãƒ‡ãƒ¼ãƒ¢ãƒ³ã§Ajaxリクエストを作りã¾ã™ã€‚</p>
