API経由だとJSONでないと取得できず、しかもリアルタイムなデータではないっぽい。 ので、Web::Scraperを使って取ってみるテスト。 #!/opt/local/bin/perl use strict; use warnings; use Encode; use Web::Scraper; use URI; # ユーザー情報 my $user = scr…