Select Code to Download

<form action='table_extract.pl' method = 'get'>
        <td><input type='radio' name='signoff' value = 'approve'>Appro
+ve<br>
        <input type='radio' name='signoff' value='review'>Review</td>
    <td><input type='button' type='submit' value='Save'/></td></form>

#!/usr/bin/perl -wT
use CGI qw(:standard);
...
   print OUT param('signoff'),"\n";
   close(OUT);
}else{die ("param issue");}