#!/usr/bin/perl

use warnings;
use strict;
use CGI qw/ :standard /;

print hidden(
    -name => "foo",
    -default => "bar",
), "\n";