Test::Mojoでuser agentの変更で失敗したこと。
Test::MojoのSYNOPSISに
my $ua = $t->ua; $t = $t->ua(Mojo::UserAgent->new);
と書いてあったので、
「$t->uaにMojo::UserAgentいれればいいんだなー?」とか思って。
my $t = Test::Mojo->new("MyApp"); my $ua = Mojo::UserAgent->new; $ua->name("Mozilla/5.0 (Linux;...."); $t->ua($ua) $t->get_ok("/")->status_is("200");
とかしたんだけれど、これは駄目だった。
MyAppからとってきた時に、ua自体にいろいろデータをいれられていたので、
それを置き換える形になってしまいNG。
$t->uaは、デフォルトでMojo::UserAgentとのことで。
my $t = Test::Mojo->new("MyApp"); $t->ua->name("Mozilla/5.0 (Linux;...."); $t->get_ok("/")->status_is("200");
としたら期待通りだった。
ミスったミスった。