Download as PDF, PPTX
![httpd.conf <VirtualHost *:80> ServerName www.example.com DocumentRoot /srv/www.example.com/public ServerAdmin you@example.com <Directory "/srv/www.example.com/public"> AllowOverride None Options +ExecCGI -MultiViews +SymLinksIfOwnerMatch Order allow,deny Allow from all AddHandler cgi-script .cgi </Directory> RewriteEngine On RewriteCond %{REQUEST_FILENAME} !-f RewriteRule ^(.*)$ /dispatch.cgi/$1 [QSA,L] ErrorLog /var/log/apache2/www.example.com-error.log CustomLog /var/log/apache2/www.example.com-access_log common </VirtualHost>](https://image.slidesharecdn.com/using-dancer-120512095139-phpapp02/75/Using-Dancer-63-2048.jpg)
![Routing get '/' => sub { return 'Hello, world'; }; any ['get','post'] => '/' => sub { ... };](https://image.slidesharecdn.com/using-dancer-120512095139-phpapp02/75/Using-Dancer-65-2048.jpg)
Using Dancer
- 1. Dancerで Webアプリ再入門 Hokkaido.pm#7 Yoshihiro Sasaki
- 2.
- 3.
- 4.
- 5.
- 6.
- 7.
- 8.
- 9. まず初めに @riywoさん お越し頂きありがとうございます！
- 10.
- 11.
- 12.
- 13. AWS Health Info •Twitterアカウントでログイン
- 14. AWS Health Info •Twitterアカウントでログイン • AWS Service Healthをチェック
- 15. AWS Health Info •Twitterアカウントでログイン • AWS Service Healthをチェック • 登録者にお知らせ
- 17.
- 18.
- 19. • 表側のみ作ってあって、裏側の＠送信 とかないです •でも、ドメインを勢いで取ったので後 で実装します
- 20. • 表側のみ作ってあって、裏側の＠送信 とかないです •でも、ドメインを勢いで取ったので後 で実装します • さくらVPSで動かしてます
- 21. アジェンダ 1. Dancerの紹介 2. Dancerの基本文法 3.AWS Health Infoのソースを読む
- 22.
- 24.
- 25.
- 26.
- 27.
- 28. Dancerの特徴 • Sinatra系のPerl製WAF • すっごくシンプル •豊富なプラグイン • 意外と豊富なドキュメント
- 29.
- 30.
- 31. Hello, world use Dancer; get'/' => sub { return 'Hello, world'; }; dance;
- 32. $ ./hello.pl $ curllocalhost:5000 Hello, world
- 33.
- 34.
- 35. $ dancer -aMyApp
- 36.
- 37.
- 38. シンプル • 基本は useDancer するだけ
- 39. シンプル • 基本は useDancer するだけ • Dancer.pmがexportする関数を使う
- 40. シンプル • 基本は useDancer するだけ • Dancer.pmがexportする関数を使う • クラス構成もシンプル
- 41. EXPORTS config redirect cookie request debug send_error forward set get session layout template param uri_for post その他諸々
- 42.
- 43.
- 44.
- 45. 豊富なプラグイン • Dancer::Plugin 94件 •Mojolicious::Plugin 102件
- 46. 豊富なプラグイン • Dancer::Plugin 94件 •Mojolicious::Plugin 102件 • Catalyst::Plugin 320件
- 47. 豊富なプラグイン • Dancer::Plugin 94件 •Mojolicious::Plugin 102件 • Catalyst::Plugin 320件 • Amon2::Plugin 12件
- 48.
- 49.
- 50.
- 51. メジャーなPlugin • Dancer::Plugin::Database • Dancer::Plugin::DBIC •Dancer::Plugin::Email
- 52. メジャーなPlugin • Dancer::Plugin::Database • Dancer::Plugin::DBIC •Dancer::Plugin::Email • Dancer::Plugin::Thumbnail
- 53. メジャーなPlugin • Dancer::Plugin::Database • Dancer::Plugin::DBIC •Dancer::Plugin::Email • Dancer::Plugin::Thumbnail • Dancer::Plugin::Facebook
- 54. もっと知りたい方は Dancer plugins ecosystem http://advent.perldancer.org/2011/17
- 55. Pluginの作り方 package Dancer::Plugin::LinkBlocker; use Dancer':syntax'; use Dancer::Plugin; register block_links_from => sub { my $conf = plugin_setting(); my $re = join( '|', @{ $conf->{hosts} } ); before sub { if ( request->referer && request->referer =~ /$re/ ) { status 403 || $conf->{http_code}; } }; }; register_plugin; 1;
- 56.
- 57.
- 58.
- 59.
- 60. ドキュメント • Dancer::Introduction • Dancer::Tutorial •Dancer::Cookbook
- 61. ドキュメント • Dancer::Introduction • Dancer::Tutorial •Dancer::Cookbook • Dancer::Plugins
- 62. ドキュメント • Dancer::Introduction • Dancer::Tutorial •Dancer::Cookbook • Dancer::Plugins • Dancer::Deployment
- 63. httpd.conf <VirtualHost *:80> ServerName www.example.com DocumentRoot /srv/www.example.com/public ServerAdmin you@example.com <Directory "/srv/www.example.com/public"> AllowOverride None Options +ExecCGI -MultiViews +SymLinksIfOwnerMatch Order allow,deny Allow from all AddHandler cgi-script .cgi </Directory> RewriteEngine On RewriteCond %{REQUEST_FILENAME} !-f RewriteRule ^(.*)$ /dispatch.cgi/$1 [QSA,L] ErrorLog /var/log/apache2/www.example.com-error.log CustomLog /var/log/apache2/www.example.com-access_log common </VirtualHost>
- 64.
- 65. Routing get '/' =>sub { return 'Hello, world'; }; any ['get','post'] => '/' => sub { ... };
- 66. Routing get '/user/:name' =>sub { my $name = param 'name'; }; get '/user/*' => sub { my ($name) = splat; };
- 67. Request Parameters get '/'=> sub { my $id = param 'id'; }; post '/' => sub { my $id = param 'id'; my $file = upload('file'); # Dancer::Request::Upload object $file->copy_to('/path/to/flie'); };
- 68. Request Parameters # GET/entry/foo?id=bar get '/entry/:id' => sub { my $id = param 'id'; # $id => foo }; # 追記 paramsを使えばデータソース別に取れます # perldoc Dancer::Request # Fetching_only_params_from_a_given_source
- 69. Config set 'tmdpir' =>'/tmp/myapp'; get '/' => sub { my $config = config; return $config->{appname}; };
- 70. Cookie get '/login' =>sub { my $id = param 'id'; my $password = param 'password'; if ( $id eq 'cto' && $password eq 'onagatani' ) { cookie 'logged_in' => 1; redirect '/'; } };
- 71. Session set session => 'YAML'; set session_dir => '/tmp/sessions'; set session_name => 'sid'; # default dancer.session get '/login' => sub { my $id = param 'id'; my $password = param 'password'; if ( $id eq 'cto' && $password eq 'onagatani' ) { session 'user' => { name => 'onagatani' }; redirect '/'; } };
- 72. Template set template =>‘template_toolkit’; get '/' => sub { my $id = param 'id'; template 'index', { id => $id }; };
- 73. 注意 Dancer::Template::Simple IF,LOOPがありません
- 74.
- 75. Database use Dancer::Plugin::Database; get '/entry/:id'=> sub { my $id = param 'id'; my $data = database->quick_select( 'entry', { id => $id } ); };
- 76. Redirect get '/foo' =>sub { redirect '/myaction'; }; get '/bar' => sub { # internal redirect forward '/myaction'; };
- 77. Logging set logger =>'console'; set log => 'debug'; get '/logging' => sub { core 'foo'; debug 'bar'; info 'baz'; warning 'hoge'; error 'piyo'; };
- 78. AWS Health Infoの ソースを読む
- 79.