Prev / Next / /home/pochi/ChangeLog

ニックネーム相性診断 - 魔法のMD5[ネタ]

2006-08-18

http://www.newspace21.com/mix/ai_list.php

mixi のニックネームで相性診断をすると楽しめるね。

とりあえず友達リストの最初に出てくるトップ50人で
相性診断してみたよ。

最高に相性が良いのは「もんがい」さん。
大学時代の先輩だな。
トロンボーン吹きなんだけど、最近はバイオリンも
弾くらしいので、きっと、プルトを組め、ということだな。

最低だったのは、最近ブレイク中の「づか」さん。
大笑い。

「づか」さんの会社。社長一人しかいないけど。
http://crossfire.jp/blastj/

「づか」さんのブログ
http://d.hatena.ne.jp/i-zuka/


参考までに、数値は以下のような感じ。

1 もんがい 100 95 83 98 89 93
....
50 づか 9 5 2 7 4 5



マイミク一覧の出力なんだけど、逃避がてら WWW::Mixi で遊んでみたよ。

WWW::Mixi モジュール
http://search.cpan.org/~tsukamoto/WWW-Mixi-0.47/

マイミクリストを取得するプログラムは以下ね。
トップの50人しか表示しなかったり、
chop でお茶を濁してたり手抜きしまくり。
Perl だもの(by みつを)

#!/usr/bin/perl -T

use strict;
use WWW::Mixi;

my $mixi = WWW::Mixi->new('account@example.com', 'password');

my $response = $mixi->login
     or die "login error\n";

my @items = $mixi->parse_list_friend($response)
     or die "can't get friend list\n";

foreach my $item (@items) {
    my $subject = $item->{'subject'};

    ### "さん" を除去
    chop $subject; chop $subject; chop $subject; chop $subject;

    print "$subject\n";
}

permlink