use DBI;
print "Content-type: text/html\n\n";
use POSIX qw(strftime);
$shortdate = strftime "%B %d, %Y", localtime;
$Posted=$shortdate;
$JobID=param('JobID');
$EmployerID=param('EmployerID');
$EmployerName=param('EmployerName');
$Title=param('Title');
$City=param('City');
$StateProvince=param('StateProvince');
$Description=param('Description');
$Function=param('Function');
$Sector=param('Sector');
$Country=param('Country');
my $dbh = DBI->connect('dbi:mysql:jobs_db','poster','posterpasswd');
my $sth =$dbh->prepare("INSERT INTO jobs (JobID,EmployerID,EmployerName,Title,City,StateProvince,Description,Function,Sector,Country,Posted)
Values(?,?,?,?,?,?,?,?,?,?,?)");
$sth ->execute($JobID,$EmployerID,$EmployerName,$Title,$City,$StateProvince,$Description,$Function,$Sector,$Country,$Posted);