use CGI ":standard";
my $var_Typ = "variable";

autoEscape(0);

print CGI::button(-id=>"$var_Typ-parm-toggle",
                  -value=>'show/hide',
                  -onClick=>"toggle_visibility('$var_Typ');",
                  -name=>"show table");
__END__
<input type="button"  name="show table" value="show/hide" onclick="toggle_visibility('variable');" id="variable-parm-toggle" />