(update: changed phrasing) You should probably be using CGI.pm for this. Here's a starting snippet.

use strict;
use warnings;
use CGI qw(:standard);

my %enable = ( yes => "Yes",
               no => "No",
               );

print
    header(),
    start_html(),
    start_form(-method => "post"),
    radio_group(-labels => \%enable,
                -name => "enable",
                -value => [ values %enable ]),
    end_form(),
    end_html();
[download]