[Dancer-users] Problem with WWW::Mechanize in Dancer

Sun Apr 10 15:54:38 CEST 2011

The "access_log" part will be renamed soon to "show_startup_info" or
something like that. There's a ticket regarding it.

On Sun, Apr 10, 2011 at 4:53 PM, sawyer x <xsawyerx at gmail.com> wrote:

> Sorry to join the party late!
>
> It is perfectly fine to run tests with Dancer and WWW::Mechanize. Since
> Dancer is a listener, the easiest way for you to do so (and the way we do it
> in our core tests) is using Test::TCP. Here is a small example of how to do
> it. I used Test::WWW::Mechanize to reduce the testing code itself:
>
> #!/usr/bin/perl
> use strict;
> use warnings;
>
> use Test::More import => ['!pass'];
> use Test::TCP;
> use Test::WWW::Mechanize;
>
> test_tcp(
>     client => sub {
>         my $port = shift;
>         my $mech = Test::WWW::Mechanize->new();
>         my $main = "http://localhost:$port";
>
>         $mech->get_ok("$main/");
>         $mech->get_ok("$main/hello");
>
>         $mech->title_is('Hello world');
>     },
>
>     server => sub {
>         use Dancer;
>
>         my $port = shift;
>
>         setting access_log => 0;
>         setting port       => $port;
>
>         get '/'      => sub {1};
>
>         get '/hello' => sub {
>             return '<html><head><title>Hello world</title></head></html>';
>         };
>
>         start;
>     },
> );
>
> done_testing();
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.backup-manager.org/pipermail/dancer-users/attachments/20110410/1d10e829/attachment.htm>