Changeset 34434 for lang

Show
Ignore:
Timestamp:
07/15/09 15:34:05 (5 years ago)
Author:
omoon
Message:

一周したときにエラーとなるSQLでした。

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/perl/misc/MyOA/tweet_feed.pl

    r34137 r34434  
    3030# twitterへの投稿回数が少ないものからランダムに情報取得 
    3131my $sth = $dbh->prepare( 
    32     "select * from tweet_counter left join documents using(id) 
    33      where count=(select min(count) from tweet_counter) 
    34      order by rand()" 
     32   "select * from tweet_counter left join documents using(id) 
     33     where title is not null order by count asc, rand()" 
    3534); 
    3635$sth->execute();