ふむ。計算があっていれば、23 時間で 1000 万パケット超える。まー、そのまえにバッテリーが切れるな。 Ust だけでこれなので他にもいっぱいつかうひとだったら危険かも。

仕事します、仕事。

追記（2009/3/12）：美人時計の中の人に怒られたのでちょっと消しますよ、、、本家からちゃんと iPhone 版でるみたいなのでしばしおまちを。

#!/usr/bin/perl
use strict;
use warnings;
use WWW::Mechanize;
use Config::Pit;
use Web::Scraper;
use IO::File;
 
# config
my $config = pit_get('iTunesConnect', require => {
    'username' => 'username',
    'password' => 'password'
});
 
# login
my $url = 'https://itts.apple.com/cgi-bin/WebObjects/Piano.woa';
my $mech = WWW::Mechanize->new();
$mech->agent_alias('Windows IE 6');
$mech->get($url);
$mech->submit_form(
    form_number => 1,
    fields  => {
        'theAccountName'    => $config->{username},
        'theAccountPW'      => $config->{password}
    }
);
if ($mech->title() ne 'iTunes Label Connect') {
    die "cannot loged in: " . $mech->title();
}
 
# select daily
$mech->submit_form(
    form_name   => 'frmVendorPage',
    fields      => {
        '9.7'   => 'Summary',
        '9.9'   => 'Daily',
        'hiddenDayOrWeekSelection'  => 'Daily',
        'hiddenSubmitTypeName'      => 'ShowDropDown'
    }
);
 
 
# download
my $opts = scraper {
    process 'select#dayorweekdropdown > option', 'date[]' => 'TEXT';
}->scrape($mech->content, $mech->uri);
 
my $latest = $opts->{date}[0];
 
$mech->submit_form(
    form_name   => 'frmVendorPage',
    fields      => {
        '9.7'   => 'Summary',
        '9.9'   => 'Daily',
        '9.11.1'    => $latest,
        'download'  => 'Download',
        'hiddenDayOrWeekSelection'  => $latest,
        'hiddenSubmitTypeName'      => 'Download'
    }
);
 
if ($mech->res()->header('Content-Disposition') =~ /filename=(.*)/) {
    print $1 . "\n";
    my $file = new IO::File($1, 'w');
    if (defined $file) {
        print $file $mech->content();
        $file->close;
    }
}

パッケージ足りなかったら CPAN で入れる。ログイン ID & PW は
perl -MConfig::Pit -e'Config::Pit::set("iTunesConnect", data=>{username=>"hoge\@example.com",password=>"hoge"})'
てな感じで設定。

審査が通ったことよりもそのスピードがこのところいろいろ聞いてたのと違いすぎて驚いた。17 日の夜にアプリ提出して 19 日の朝に Ready for Sale になったメール。んで、Pending Contract 状態突入。まあじっくり待つべと思ってたら 21 日の朝には Contract in Effect に変わっててアプリもリリースされてた、と。なんなんだろうねえ。まあいいや有料アプリ用の手続きまだやってないので来週 EIN 取得とかいろいろやるー。

あーんでもなんか高速回転させなきゃいけないとか reject されんじゃないかと思えてきた、まーいーや。次の作るよ。

これまで iTunes Store は音楽作る人向けだけだったんだけど App Stare の登場でそれがアプリケーションにまで広がった感じ。ワールドワイドに統一されたプラットフォームがあってそれを利用できる端末が 1000 万台以上あってしかもそれ使ってる人みんなが 1 click で買えちゃうなんてすごすぎる。

もちろん Apple の審査があったりだとか契約うんぬんで問題があったりだとか Objective-C で書くのキモイメンドイとかいろいろつっかかるところはあるんだけど、僕みたいなもんでもコンテンツを全世界にバラまいてお金に変えられるプラットフォームがあるってーのは非常に魅力的。

うん、まあ、簡単じゃないな。トイカメラアプリはいくつかあるのに fladdict の ToyCamera がランキング上位なのは彼の知名度によるところが大きいと思うわけで。ゴミアプリが大量にあるなかで自分のアプリをいかにアピールできるかっていう。

っっていうか、ちゃいますねん。僕もはやくいろいろ考えてるネタをリリースしたくって。とりあえず途中まで作ってたアレやっぱちゃんと形にして free でいいから出しとくかーとか思っていろいろ考えてたらこんなエントリになりましたとさ。

いやー、ぼくの iPhone ほんとによく回るんですよ。だから会議中もクルクルまわすのが癖みたいになってたりとか。んである日ピコーンときて作ったのが↓なんだな。

My iPhone turns at very very high speeeeeeeeeed!! from Saqoosha on Vimeo.

んでなんやねーんっていうww
加速度センサーが回転の中心からズレてるから、遠心力から回転スピードが計算できるっつーわけですな。もちろん fladdict のゆってるような Y 軸回転でもできるよね。（その場合は X 軸方向で計測するのがいいかなあ）実際にはセンサーそんなに精度よくなくって、加速度がけっっっっこうノイズなのかなんなのか乱れるので絵を固定するのが大変なんだけど。あと、回転方向もとれないんだよなあ。

・・・

なんでそんなに回るんだっつーと、たぶん、iPhone につけてるカバーのせい。パワサポの Air ジャケットのクリアのんつけてて、密着防止用のシールを真ん中に１個だけ貼ってるからちょっとだけ真ん中が盛り上がってるのね。んでよく回るんじゃないかなあ。なんにもつけない状態でも回るのかもしれないけどキズが怖くてできないww

まあそんな特殊なミーの iPhone でしか動かせないってのもあるので、特にもうちょっといい感じにしてリリースするとかって予定もないですな。

・・・

つーかさー、App Store の契約諸々ってアプリつくってなくてもできるんやん。知らんかった。もっとはやくやっときゃよかったなー、もー、来月引っ越しとか微妙すぎ。もー、アプリリリースするとしても来年だわ。。

んでまあ、Objective-C でサーバーサイドとやりとりするんはどーやったらええねん？っといろいろ調べたところ XML-RPC がらくちんぽい。（オープンソースでやっちゃってる WordPress for iPhone も XML-RPC で通信。ってまーブログエディタだからあたりまえだけど。）でー、サーバーサイドを PHP で書こうと思ったんだけど PEAR のんとか書くのすんげえめんどい。。。むにゃむにゃ。ピコーン！てなかんじで AMFPHP が XML-RPC 対応してることを思い出したわけですな。（1.9 beta2 のほうね）

AMFPHP って XML-PRC でのメソッド呼び出しにも対応してるのよ。ひとつサービスつくると AMF と XML-RPC の両方でアクセスできるっていう。しかもサービス書くのは普通に PHP のクラス書くだけでいい。ちょーラクチン。（実は JSON での応答も対応してるんだけどこれはちょっと特殊。JSONP でも JSON-RPC でもないので呼び出し側は自力で実装しなきゃいけない。）

んでこれを書いておこうと思ったのでした。1.9 beta2 のそのままだと日本語が変にエンコードされちゃって使えないのでちょっといじります。amfphp/core/xmlrpc/app/Actions.php の 51 行目ぐらい。エスケープすべき文字種と XML のエンコードを指定。

$output_options = array('escaping' => 'markup', 'encoding' => 'UTF-8');
$args = array($xmlrpc_server, $request_xml, array(&$classConstruct, $methodName), $output_options);

はい。めでたしめでたし。
あー、でも、どうせなら AMF でやりとりするほうが効率いいよなー。だれか Cocoa 用の AMF デコーダーみたいなん書いてー。