#!/usr/bin/perl --
use strict; use warnings;
use CGI::FormBuilder;
{   
    my $env_choose = CGI::FormBuilder->new(
        fields   => [qw(env_type env_state)],
        header   => 1,
        method   => 'post',
        keepextras => 1,
     
    );

    if ($env_choose->submitted) {
        print $env_choose->confirm;
    }
}