use strict;
use warnings;
use DBI;

my $userid   = DB::trim( param('USERID') ); 
my $DISABLED = DB::trim( param('Disabled'));

my $sql= "UPDATE EmployerJobs SET Disabled = ". 
"'$DISABLED' where USERID = '$userid'";

$dbh = DB::connect ();

$dbh->prepare($sql);
$dbh->do($sql);

$dbh->disconnect ();