print $rBid->{session}->header(-type=>'text/javascript');
my $sth = $rBid->{dbh}->prepare(
'INSERT INTO bid VALUES (?, (SELECT bidder_username
  FROM session WHERE id=?));') or die $rBid->{dbh}->errstr;
$sth->execute($rBid->{cgi}->param('aid'),
  $rBid->{session}->id()||'undef') or
  print 'alert("Error: '.
    $rBid->{cgi}->escapeHTML($sth->errstr).'");'."\n";

print 'alert("Bid(s) Placed: '.
  $rBid->{cgi}->escapeHTML($sth->rows).'");'."\n";