はい。やべっちFC は、朝 7:30 からです :-)

script は http://userscripts.org/scripts/show/28493 に置いておきました。神奈川にロケフリを置いている人も使えるかと思われます。

getTimezoneOffset を使っています。便利！。現在時を元にタイムゾーンからの差分を計算するので、DST の境目をまたいで未来の番組表を見る場合はずれるかもしれないが、まぁよしとする。あと、JavaScript で padding を自分でしなきゃいけないのは面倒ですな。 getHours('hh') とか sprintf('%2d', getHours()) とかほしくなります。

Perl で L10N といえば、Locale::Maketext::Lexicon ですが、間違った *.po ファイルを Gettext で指定すると、これでもかってくらいに探しまくるんですよね。例えば、実際に使いたい strings.po は /doko/soko/strings.poなのに、間違って /soko/strings.poを指定したとします。こんな感じ

    package Hello::I18N::de;
    use base 'Hello::I18N';
    use Locale::Maketext::Lexicon (Gettext => '/soko/strings.po');
    1;

すると、Gettext が SCALAR なので、Locale::Maketext::Lexicon::lexicon_get_() が呼び出されるんですが、ここでのファイルが見つからなかったときの探し方が。。

    my @path = split( '::', $caller );
    push @path, $lang if length $lang;

    $src = (
        grep { -e } map {
            my @subpath = @path[ 0 .. $_ ];
            map { File::Spec->catfile( $_, @subpath, $src ) } @INC;
          } -1 .. $#path
      )[-1]
      unless -e $src;

@INC で map して grep して -e って。$caler は scalar caller で定義されて Locale::Maketext::Lexicon が入ってるんだけど、結局のところ、たとえば手元の環境だと

/usr/lib/perl5/5.8.8/i686-linux/Locale/soko/strings.po
/usr/lib/perl5/5.8.8/Locale/soko/strings.po
/usr/lib/perl5/site_perl/5.8.8/i686-linux/Locale/soko/strings.po
/usr/lib/perl5/site_perl/5.8.8/Locale/soko/strings.po
/usr/lib/perl5/site_perl/5.8.5/Locale/soko/strings.po
/usr/lib/perl5/site_perl/5.8.4/Locale/soko/strings.po
/usr/lib/perl5/site_perl/5.8.3/Locale/soko/strings.po
/usr/lib/perl5/site_perl/5.8.2/Locale/soko/strings.po
/usr/lib/perl5/site_perl/5.8.1/Locale/soko/strings.po
/usr/lib/perl5/site_perl/5.8.0/Locale/soko/strings.po
/usr/lib/perl5/site_perl/Locale/soko/strings.po
/usr/lib/perl5/5.8.8/i686-linux/Locale/Maketext/soko/strings.po
/usr/lib/perl5/5.8.8/Locale/Maketext/soko/strings.po
/usr/lib/perl5/site_perl/5.8.8/i686-linux/Locale/Maketext/soko/strings.po
/usr/lib/perl5/site_perl/5.8.8/Locale/Maketext/soko/strings.po
/usr/lib/perl5/site_perl/5.8.5/Locale/Maketext/soko/strings.po
/usr/lib/perl5/site_perl/5.8.4/Locale/Maketext/soko/strings.po
/usr/lib/perl5/site_perl/5.8.3/Locale/Maketext/soko/strings.po
/usr/lib/perl5/site_perl/5.8.2/Locale/Maketext/soko/strings.po
/usr/lib/perl5/site_perl/5.8.1/Locale/Maketext/soko/strings.po
/usr/lib/perl5/site_perl/5.8.0/Locale/Maketext/soko/strings.po
/usr/lib/perl5/site_perl/Locale/Maketext/soko/strings.po
/usr/lib/perl5/5.8.8/i686-linux/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/5.8.8/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/site_perl/5.8.8/i686-linux/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/site_perl/5.8.8/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/site_perl/5.8.5/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/site_perl/5.8.4/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/site_perl/5.8.3/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/site_perl/5.8.2/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/site_perl/5.8.1/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/site_perl/5.8.0/Locale/Maketext/Lexicon/soko/strings.po
/usr/lib/perl5/site_perl/Locale/Maketext/Lexicon/soko/strings.po

これ全部 stat(2) して、「ぜぇぜぇ、がむばって探したけど無かったよ。じゃ、死にます」みたいな。いやぁ、そこまでがんばらなくていんだけどなぁ。そもそも scalar caller で $caller 定義しているのは本当にやりたいことなんだろうかとか思ったら 「scalar caller(1) でしょ？」ってのが RT に2年前に登録されてるな。まぁ、先にファイルが存在するのをチェックしないお前が悪いってことか。

まとめ: Locale-Maketext-Lexicon で Gettext でファイルを指定するまえに -e なりでそのファイルの存在を確かめましょう。DProfもいいけど strace を使うことで簡単に見つかるパフォーマンス改善ポイントもありますよという話でした。

今朝、家でぼけっとしていたら10時近くになってしまったのであわててオフィスへ自転車で向かったのですが、AT&T Park で大量の中国国旗が振られているのに気づきました。そうです、トーチリレーのスタート地点はSF Giants のホームスタジアム AT&T Park です。チャーターのバスも何台かありました。近隣からトーチリレーを見るツアーか何かがあったのでしょう。1000人ちかくの在サンフランシスコの中国人が集まり、中国の国旗を振っています。子供たちが踊りで歓迎するなど、Chinese New Year Parade と似た雰囲気。少し離れた場所でチベットの旗を振っている団体を見かけたけど、こっちは20人程度。あとは人権保護の団体が Stop Tibet Genocide とか書いた旗を持っていたけど、これも10人程度。その騒動をすり抜けるように白人カップルがiPodで音楽を聴きながらジョギングして駆け抜けていく。なにか起こらないかなぁと待ち構えているメディア。

トーチリレーは 12:30 スタート。デモのリーダーはまだ現地に到着していないからかもしれませんが、淡々と準備されている印象。在サンフランシスコの中国人は本当に楽しみにしているみたいです。反面、ほとんどのアメリカ人は関心を持っていないし、「また、人権保護団体が騒いでいるな」くらいの感覚なのではないでしょうか。「何か事件が起こってほしいのはメディアだけ」な印象です。

ロンドン、パリで大騒ぎだったトーチリレーがサンフランシスコにやってきます。cbs5.com でもなかなかの騒ぎっぷりです。　Team Coverage: Torch Arrival Sparks SF Protests という動画をご覧ください。

• Civic Center と中国大使館の間をデモ行進
• トーチリレーを止めるべきだというサングラスをかけた若者
• デモ行進に参加している、何人かの白人はどこにチベットがあるかすらわかってない
• 場所はわからなくても、問題は把握している。そうだ
• チャイナタウンの商人はむしろ北京オリンピックを歓迎
• 広東人が多くすむチャイナタウンには170年の歴史がある
• コースの変更などにあわせて柔軟にバスの停止などを対応するという MTA の偉い人
• 橋渡しをしたいと言うランナー

といったあたりが見所でしょうか。サンフランシスコは全米で唯一、トーチリレーが行われる場所なので、リベタリアンが集まってきてるのでしょうね。これまでに、チャイナタウンからたしか警備の関係で海沿いのコースへ変更されたのですが、実際のコースは明日になってみないとわからないというミステリーツアーの形相であります。

個人的な意見としましては、トーチの火を力ずくで消火器で消すのは中国がチベットに対してやっているところと「実力行使」という面では変わらないのでやるべきでは無いと思います。デモ自体は表現の自由として何の問題も無いし意見があるなら声を上げてしかるべき。

ほかには素朴な疑問が二つ。この時期に「チベット問題」を取り上げることで誰が得しているでしょうか。あと、「独立したい！」っていっても独立できないものなのでしょうか。チェコスロバキアはそうやって、チェコとスロバキアになったんですよね？。北海道も日本から独立したいっていったら自衛隊が弾圧するんでしょうか。

報道/情報バラエティはもういらない

まず、ざっくばらんに今のテレビの問題って何だろうねって話を妻の人としてみたのです。

• 偏った演出（例：日テレのジャンアンツ、ボクシングの亀田選手とTBS、サッカー日本代表の試合中継における松木安太郎解説者）
• 過剰な脚色、捏造（例：マクドナルド店長ヤラセ事件、あるある納豆ダイエット、みのもんたそのもの）

ドラマやバラエティ含めた全体の話のつもりで話を振ったものの「報道（もしくは報道バラエティ）」「スポーツ中継」に対する不満が多くなるってのは興味深い。小さいころは久米宏の報道ステーションとか楽しんでみてたんですけどね、いまは見たいと思わない。番組から押し付けられる主義主張が虚構にしか見えなくなってきてる。「テレビのニュースでやってたんだけどさ」ってのは「どうせ、やらせでしょ」と返されるのがこのご時世。

個人的には報道/情報バラエティは見ないから消えてなくなってくれてかまわない。むしろ消していただいて、その枠でドラマやスポーツ中継の再放送を延々と流してくれた方が嬉しい。

テレビ放送とDVDの中間

次に、テレビドラマ等が違法に YouTube や Veoh とかにアップロードされるってのはどうかという話をしてみた。「見ることが違法」になったらわざわざそんな危険を冒してまでは見ない。違法なら閲覧不可の状態にしていただいて結構。脱獄するより DVD 借りて映画でも見るほうが幸せ。という結論に。

そもそも、「月曜夜9時」とか決まった時間にしか見れないのはなんでなんだろうね。見ようと思ったときに見れないなら見ないよ。昔はテレビしかなかったから、わざわざ時間に合わせてたけど、いろいろとほかの遊びに忙しいのであわせて上げられないんです。

逆に、見たいと思ったときに見れるなら番組の途中でCMが入っても見るんだな。運良くUSに住んでいる人には Hulu.com という解決策がある（ほかにも Netlix や iTMS での TV Show とかいろいろあるけど）。 大手テレビネットワーク NBC と FOX がはじめたベンチャーで数は少なかったり、１シーズン古かったりするけどオンデマンドで再生できる。CMが途中に入るんだけど、通常と比べて控えめなのでテレビほど嫌な感じはしない。ネット対応の設備投資リスク（ストレージとネットワークを考えると結構な額のはず）をジョイントベンチャーで回避といった形なのでしょうか。わかりませんが。ハイビジョンとかは別にいらないから　時効警察とか、古畑任三郎とか、トップランナーとかこうやって見れるといいのに！とか思うのだ。DVD 買えっていう話もあるかもだけど、水曜どうでしょう以外にそこまでして見たいものってないな。

「テレビ放送で見る」のと「DVD買って見る」の中間の解決策を提供していただけますかね。CMがあっても見るし、ハイビジョンじゃなきゃ嫌とかわがままは言いません。そうじゃないと、テレビの人が嫌がる別の方法をつかうことになってしまいます。

PS. 4/8 スタートの RD洗脳調査室 はPSTタイムゾーンでいうところの 火曜日の朝 08:59 放送。見てから出社する。

rpm -e --nodeps rpm

さて困ったな、と思ったら rpm は cpio のファイルだから簡単に復活できるよと運用チームのスタッフが教えてくれたので rpm cpio で検索すると RPMパッケージからファイルを取り出すには というサイトを発見。rpm2cpio をほかのマシンから scp して持ってきてから、以下のようにして無事インストールできました。

$ cd /
$ /tmp/rpm2cpio /tmp/rpm-4.3.3-18_nonptl.x86_64.rpm | sudo cpio -id

あーびっくりした。

つまり、子供用の車のおもちゃで蛇行する坂を滑り降りるだけのイベント。くまの着ぐるみや、仮装してくる人、そもそも車じゃないもので滑り降りる人（ゴミ箱で滑っている人がステキでした）など、いろいろな人がいます。見てる方は、クラッシュしたり、途中でタイヤが外れたりするのをみて楽しんでいます。「多数の大人が、子供のように遊ぶ」ってステキですね。

このイベントは完全ボトムアップのイベント。スポンサーなし参加費無料（そもそも参加手続きが無い）という形です。いままでは Lombard Street という観光地として有名な場所でやっていたんですが、去年はしゃぎすぎてお叱りを受けたそうで、今年は Vermont St. の 20th St. から始まる同じような蛇行する下り坂を使って行われました。家から歩いて10分くらいです。便利になりました。

見ていると、このイベントは参加した方がもっと楽しいイベントだと確信。来年はぜひとも参加したいと思ってます。

• それ、パソコンで見れるよね？
• 自分の好きな音楽で目覚める？むしろ眠くならない？
• ロケフリ見れないんでしょ？

（ａ）の「二重身分」の既婚者には、１月１日から１２月３１日迄の「一年間」を通して「米国居住者」と見なし、「夫婦合算申告」(married joint filing)する、つまり夫婦の一年間の全世界所得を合算して一つの申告書として報告する「選択」(IRC (Internal Revenue Code) Section 6013(h) or IRC Section 6013(g) election)があります。

二重身分でありながら、通年居住者として扱う選択をすると、夫婦個別に比べ実効税率が低い夫婦合算の居住者申告ができます。しかし、その代わりに赴任前の全世界所得も加えて報告しなければなりません。つまり日本での所得を入れることになります。しかし、何といってもこの際メリットが大きいのは、夫婦合算で申告できるということです。

赴任前の日本の所得を含めるのは一見デメリットのように思えますが、日本で所得税が支払われていれば、それを外国税額控除（クレジット）として米国の連邦税を減額させるのに利用することができますし、赴任が年の初めに近ければ近い程、「選択による夫婦合算申告」の方が「原則の夫婦個別申告」よりも節税になる場合が出てきます。４月位迄の赴任なら、選択して年間居住者扱いする方が節税になるというのが最近の一般的傾向です。
（星野会計事務所 の 2007年米国個人所得税　想定Q&A より一部引用）

• Form 2555 Foreign Earned Income （海外での収入） （追記: このFormは米国市民及び米国永住権所有者であって米国外で居住した人達が使用するものらしい。 在日米国市民、または在日米国税法上Resident の申告 参照）
  
• Form 1116 Foreign Tax Credit （米国納税計算上税額控除）
• Form 3903 Moving Expense （引越費用控除）

• クレジットカード会社にSkypeで利用代金明細書の再送依頼
• Form 2555 の記入（追記: このFormは米国市民及び米国永住権所有者であって米国外で居住した人達が使用するものらしい）
• そもそも二人分いるのかどうか（追記：二人分いる。Pub 54 参照。1040 Line 21 には combined exclusions つまり合算を記入）
  
• line 16 Physical Presence Test にパスでOK？
  
• line 29a Tokyo と Tokyo-to の違い
  
• line 44 "Deductions allowed in figuring your adjusted gross income (Form 1040, line 37) that are allocable" とは？
• Form 3903 に飛行機代を記入し再計算
• Form 1116 の記入
  
• Form 1040 に 2555, 1116, 3903 の反映、再計算
• 州税

• Well Read 4
• Grammar Express
• Effective academic writing 3

• prediction (will or be going to): "In a few years people will fly to Mars"
  
• prior plan (be going to): "Chris Anderson is going to speak tomorrow"
  
• willingness (will): "A: Wow! It's so heavy  B:I'll carry it for you"
• close to happen(be going to) "Look at that dark clouds. It's going to rain"

• .ORG Domain Name Renewal - 5 Years
• $45.75(= $9.15/y x 5y) + ICANN fee $1(= $.20 x 5y) = $46.75
  

• Private Registration Services - Renewal - 5 years
• $7.95 x 5y = $39.75

• 居住者になったのは 3/3 なのか 1/20 なの？

• 結局、どっちを選択すれば得なの？

• 引越し費用のレシート日本語だけどいいの？

Last.fm の neighbors は選曲がすばらしいのですが、配信される mp3 ファイルの音量にばらつきが多く、急に音量の大きな曲が再生され心臓が飛び出しそうになることもしばし。その点、競合他社である Pandora の場合はあらかじめ音量がされているようで、普通のインターネットラジオと同じような感覚で聞くことができます（今現在、アメリカ合衆国以外のIPアドレスからは音楽を再生できなくなっていますが）。Pandora のプレーヤーにも Last.fm のような "Thumbs Up" という仕組みがあるのですが、このイベントのログは外には公開されていないようなので、あらかじめ RSS で配信されている "Bookmark" を Action Stream に追加できるようにしました。

plugins/ActionStreams/config.yaml の action_streams: セクションに以下を追加し、Pandora のプロフィールをいったん削除し、追加するだけです。（この「削除、再登録」面倒だ）

    pandora:
        favorites:
            name: Favorites
            description: Your "Bookmarked" songs
            html_form: '[_1] bookmarked a song <a href="[_2]">"[_3]"</a>'
            html_params:
                - url
                - title
            url: 'http://feeds.pandora.com/feeds/people/{{ident}}/favorites.xml'
            identifier: url
            xpath:
                foreach: //item
                get:
                    title: title/child::text()
                    url: link/child::text()
                    created_on: pubDate/child::text()
                    modified_on: pubDate/child::text()