BEGIN {
$ENV{QUERY_STRING} = 'mode=orig';
$ENV{REQUEST_METHOD} = 'GET';
}
use CGI qw( hidden );
print hidden( 'mode', 'second arg' ), "\n";
print hidden( -name => 'mode',
-default => 'default', ), "\n";
print hidden( -name => 'mode',
-default => 'forced',
-override => 1 ), "\n";
__END__