/[couchdb]/scripts/reblog2couchdb.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /scripts/reblog2couchdb.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 4 by dpavlin, Tue Aug 5 14:48:57 2008 UTC revision 5 by dpavlin, Tue Aug 5 15:03:24 2008 UTC
# Line 10  $|++; Line 10  $|++;
10  my $database = 'reblog';  my $database = 'reblog';
11    
12  my $connect = "DBI:mysql:database=$database";  my $connect = "DBI:mysql:database=$database";
13  #$connect = "DBI:mysql:database=$database;host=localhost;port=13306";  $connect .= ";host=127.0.0.1;port=13306";       # XXX over ssh
14    
15  my $dbh = DBI->connect($connect,"","") || die $DBI::errstr;  my $dbh = DBI->connect($connect,"","") || die $DBI::errstr;
16    
# Line 28  my $sql = qq{ Line 28  my $sql = qq{
28  --      where label = 'read' and value_numeric = ?  --      where label = 'read' and value_numeric = ?
29          join feeds on items.feed_id = feeds.id          join feeds on items.feed_id = feeds.id
30          order by items.id asc          order by items.id asc
31  --      limit 42          limit 5000
32  };  };
33    
34  my $sth = $dbh->prepare($sql) || die $dbh->errstr();  my $sth = $dbh->prepare($sql) || die $dbh->errstr();
Legend:
Removed from v.4  
changed lines
  Added in v.5
  ViewVC Help
Powered by ViewVC 1.1.26