mixi_exportの件追記

mixi_exportの件追記

昨日の件の続き。

mixi_exportが途中で落ちたので

mixi側の仕様変更に追従できなかったのではないか？とか、最悪自分で改造して対応…とか思ったけど

#---------------------------------------------------------------------
# ●ログデータを取得
#---------------------------------------------------------------------
my $get_border = 0;
my %years;
@yyyymm = sort { $b <=> $a } @yyyymm;
foreach my $yyyymm (@yyyymm) {
    my $year = substr($yyyymm, 0, 4);
    my $mon  = substr($yyyymm, 4, 2);
    my $int_mon = int($mon);
    if (($yyyymm*100+99) < $get_border) { last; }
    &myprint("■$year年$mon月を処理\n");

ここのforeachの下に

foreach my $yyyymm (@yyyymm) {
    # 2010.7より新しい月はスキップ
    if ($yyyymm > 201007){ next; }
    my $year = substr($yyyymm, 0, 4);

とかやって取得できたところはスキップして試したら普通に続きが取得できたので単にネットワークエラーかメモリエラーで落ちたということだろう。ソース付いてて助かるね。 なお既存のファイルが存在すると更新モードになって1ヶ月ぶんしか取得してくれなくなるので落ちた月のファイルは消しておいたほうがよさげ。

追記

EXE版ではなくPL版を動かしていたのでわかったが、

Error : Error response from 'mixi.jp' (status 502)

しばらくアクセスが続くと502で落ちるっぽい。また↑の日付変えれば済む話だけど、