OSDN Git Service

fix SQL
authorISHIKAWA Mutsumi <ishikawa@hanzubon.jp>
Thu, 18 Oct 2012 06:11:23 +0000 (15:11 +0900)
committerISHIKAWA Mutsumi <ishikawa@hanzubon.jp>
Thu, 18 Oct 2012 06:11:23 +0000 (15:11 +0900)
mubot4fb.pl

index ef62902..a2ecbd9 100755 (executable)
@@ -92,7 +92,7 @@ sub _db_insert {
        my ($me, $db_args) = @_;
 
        my ($scheme, $path) = split(/:\/\//, $db_args->{uri});
-       my $sth = $me->{dbh}->prepare("insert into posts (submitter, fb_post_id, uri, prefix, suffix, scheme, path, post_time) values (?, ?, ?, ?, ?, ?)");
+       my $sth = $me->{dbh}->prepare("insert into posts (submitter, fb_post_id, uri, prefix, suffix, scheme, path, post_time) values (?, ?, ?, ?, ?, ?, ?, ?)");
        $sth->bind_param(1, $db_args->{submitter}, SQL_VARCHAR);
        $sth->bind_param(2, $db_args->{fb_post_id}, SQL_BIGINT);
        $sth->bind_param(3, $db_args->{uri}, SQL_VARCHAR);