use strict; use Test::More tests => 7; use_ok('SKWAT'); my $ua = SKWAT->new; $ua->get_ok('/myapp.cgi'); $ua->template_is('/login.html'); $ua->value_is('username' => ''); $ua->value_is('password' => ''); $ua->submit_form_ok('submitted login form', fields => { username => 'test.user', password => 'seakret', } ); $ua->template_is('/home.html');