Select Code to Download

    radio_group(-name=>['add_remove'],
            -values=>['Add','Remove'],
            -default=>'Add',
            -labels=>\%labels),p,

"Rule: ",em(param('add_remove')),p,

#!/usr/bin/perl -w
use CGI qw/:standard/;
...
print end_html;