#!/usr/bin/perl -w use strict; use FindBin; use lib "$FindBin::Bin/../lib"; use lib "$FindBin::Bin/../Myapp/lib/"; #use Test::MockObject; use Test::WWW::Mechanize::Catalyst; use Test::More tests=>12; use DateTime; use DateTime::Duration; my $mech = Test::WWW::Mechanize::Catalyst->new(catalyst_app => 'Myapp'); # more tests make no difference