use strict;
use warnings;
use Test::WWW::Mechanize::Mojo;
use Test::Most;
my $tester = Test::Mojo->new('ChGovUk');
my $mech = Test::WWW::Mechanize::Mojo->new(tester => $tester);
is $mech->grep_inputs({type => 'search', name => 'q'}), 1, 'Only one search box';
$mech->field( 'q', 'J & I Carpets' );
$mech->submit;
$mech->get_ok("/search");
Outputs:
HTML::Form::parse: No $base_uri provided at /home/lgoddard/perl5/lib/perl5/WWW/Mechanize.pm line 2759.
Is it me, or is the integration between the Mojo and Mech sides not been completed?
Thanks
Lee