Select Code to Download

use CGI;
$query = new CGI;
...
                  -value=>'tabname';
print $query->submit('doWhat','Print Fields');
print $query->end_form;

use CGI;
$query = new CGI;
$SFields = join(", ",$query->param('FieldNames'));
$STab    = $query->param('Tbl1');