All pastes #108754 Raw Edit

Untitled

public text v1 · immutable
#108754 ·published 2006-07-31 17:36 UTC
rendered paste body
[Mon Jul 31 10:34:26 2006] [error] [client XXX.XXX.XXX.XXX] ERROR:  syntax error at or near "''" at character 213 at /home/gtoe/web/WEB-INF/cgi-bin/camps/sessionAdmin.cgi line 393., referer: https://www.XXXXXXXXXXXX.net/cgi-bin/camps/sessionAdmin.cgi?funct=edit&id=


sub putCamp{
        my $campRef = shift;

        my $statement = "INSERT INTO camp_data (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?)";
        my $dbh = DBI->connect("dbi:Pg:dbname=warriors","warriors", undef, {PrintError => 0})
                or die "Can't connect: $DBI::errstr ($DBI::err) \n";

        my $sth = $dbh->prepare($statement) || die $dbh->errstr;

        my $ret = $sth->execute(                      # <===== line 393
                $$campRef{'camp_id'},
                $$campRef{'camp_type_id'},
                $$campRef{'location_id'},
                $$campRef{'discount_id'},
                $$campRef{'camp_name'},
                $$campRef{'camp_price_1'},
                $$campRef{'camp_price_2'},
                $$campRef{'expire_date'},
                $$campRef{'start_date'},
                $$campRef{'end_date'},
                $$campRef{'soldout_tf'},
                $$campRef{'event_id'},
                $$campRef{'camp_price_3'},
                $$campRef{'conf_text'},
                $$campRef{'camp_notes'},
                $$campRef{'archived_flag'}
        ) || die $dbh->errstr;

        $sth->finish();
        $dbh->disconnect();
        return "blah \"$ret\"";
}