##
my %radio_field_values = (
'dashboard1' => 1,
'dashboard2' => 2,
'dashboard3' => 3,
'dashboard4' => 4,
'dashboard5' => 5,
);
print radio_group(
-name => 'dashboard',
-labels => \%radio_field_values,
-values => [ keys %radio_field_values ],
);