Select Code to Download

#!/ms/dist/perl5/bin/perl5.8

...
        }
_dbdisconnect($dbh);
print "$data_exclude1[1]";

<form action="db_connect.cgi"
      method="GET">
...
<input type="checkbox" name="camera" value="on"> Camera
<input type="submit" value="Do it">
</form>