print qq(
IPS - @ips
|
Cnames - @names
|
Services - @services
|
Banners - @banners
|
),
start_form( { -action => "action_dbi.cgi",
-enctype => "application/x-www-form-urlencoded",
-method => "post" } ),
h1( strong( "Does this format look correct?" ) ),
checkbox_group(-name=>'question',
-values=>['yes','no'],
-default=>['yes'],
p( " " ),
p( input( { -type => "submit",
-value => "submit"} ),
), #end p
end_form,
end_html;