HTTP クライアントのテストを Plack でやる方法について - tokuhirom's blog
勝手に添削なかんじで。 http://d.hatena.ne.jp/Craftworks/20100819/1282237375 をみていておもったのですが、変にがんばるよりも、Test::TCP を直接つかってかいちゃった方が楽なのでは。 use strict; use warnings; use Test::More; use Test::TCP; use Plack::Loader; use LWP::Simple qw/get/; my $app = sub { my $env = shift; my $content = 'something'; # something return [ 200, [ 'Content-Type' => 'text/plain' ], [ $content ] ]; }; my $client = sub { my $base = shift;
tokuhirom blog
Blog Search when-present<#else>when-missing. (These only cover the last step of the expression; to cover the whole expression, use parenthesis: (myOptionalVar.foo)!myDefault, (myOptionalVar.foo)?? ---- ---- FTL stack trace ("~" means nesting-related): - Failed at: ${entry.path} [in template "__entry.ftlh" at line 3, column 25] - Reached through: #include "__entry.ftlh" [in template "entry.ftlh" at
1
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
処理を実行中です
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
