Drkcore

01022007 javascript

Win版インタラクティブJavaScript

COMいじりのjavascriptのデバッグめんどくさい。というわけで、win版spidermonkeyはないのか？

ということで、探したらこんなのあること知りました。素晴らしい。早速IE呼び出して試すか？なんて思ったらたつをの ChangeLogにそういうスクリプトありました。をを～

でも、ブラウザが見えるやつも書いておきます（忘れると困るから）。

js> var ie = new ActiveXObject("InternetExplorer.Application"); js> ie.navigate("http://www.google.co.jp/"); js> ie.visible=1

すんげー便利。今までちまちまエディタでhtml書いてたけど、開放された。Excelいじくるスクリプト試してみたり、pythonのwin32comで作ったコネクタのデバッグに使ったり、色々できてイイ。

31012007 javascript

javascriptの勉強などはじめてみることにした

DBICちょっと覚えて、TTにバカスカデータを送ると見栄えとか操作性がやたらと気になってくるのだけど、javascriptがいまいち分かってないので、なかなか思ったように動いてくれない。過去にもやらなきゃやらなきゃと思ったことは何度かあったのだけど、なかなか集中して勉強する機会が、、、

と言い訳するのは他にも英語とか。

JavaScript
デイビッドフラナガン
オライリー・ジャパン / ?円 ( 2000-12 )

JavaScript & DHTMLクックブック―Webエキスパート必携テクニック集
ダニーグッドマン
オライリージャパン / ?円 ( 2004-01 )

さすがにこのままじゃまずいと、これからこいつらを読みながら勉強してみることにした。本当はc++の写経でもしようかと思ってたのだが後回し。

まるごとJavaScript & Ajax ! Vol.1
天野仁史
インプレスジャパン / ?円 ( 2007-02-15 )

まるごとJavaScript & Ajax !も予約したけど、、、

到着する頃には内容が分かるようになりたいなぁ。

31012007 javascript pymol

webからインタラクテイブに蛋白質をいじるつもりだったが

今日は終日、javascript+activeXObjectでWEBからインタラクティブに操作できるビューアーがないか調べていたヨ。開発中が多くていまいちいいのが見つからないというか、javascriptもactiveXもほとんどいじったことがないでよくわからないというのが正直なところ。

pyMOLもcueMOLもスクリプトで制御できるのでWSHとかperlとかでガリガリやればできるとは思うんだがこれだとまぁ、インタラクティブではないよなぁ。

あー、javascriptとかactiveXまじめに取り組もう。

31012007 javascript

JavaScript

Perlだけじゃなくて、JavascriptとかPythonも覚えナキャってことで、ちゃんと本を買って読んでみました。

JavaScript
デイビッドフラナガン
オライリー・ジャパン / ?円 ( 2000-12 )

さらっと流しただけだが、なんとなくJavascriptがどういう言語なのかは理解した（つもり）でも、実際にクックブックとか見ながら手動かしてみないといけないなぁ。

30012007 DBIC

DBICのSingleメソッド

というか、findとの違いがいまいち。searchは分かるのでいいとして、

DBIx::Class::ResultSet - Responsible for fetching and creating resultset. - search.cpan.org

Inflates the first result without creating a cursor if the resultset has any records in it; if not returns nothing. Used by "find" as an optimisation.

カーソルを作らずに最初の結果をインフレートする、ただし結果がない場合はなにも返さない。

じゃぁ、findって何？ってことになるわけだが。

findって主キーから探すときにしか使ってなかったけど、ユニーク制約かけてあるとこから探してもいいのね。知らんかった。

DBIx::Class::ResultSet - Responsible for fetching and creating resultset. - search.cpan.org

Finds a row based on its primary key or unique constraint.

singleだと

Return Value: $row_object?

と?がついているのに、findは

Return Value: $row_object

となっているということは、singleはオブジェクトを返すかもしれないし返さないかもしれないのに対し、findの場合は必ずオブジェクトが返ってくるということか。

じゃぁ、ユニーク制約はどこでどうすんの？ってことだけど、 add_unique_constraintにあるようにDBICに制約属性ふっておけばいいらしいので、DBICが制約が張られているのをチェックしてよきに計らってくれるのだろう。(確認してないけど)

というわけで、多対多とか一対多の場合に制約属性ふっておくと検索するときに楽になるのね。

30012007 Linux

cutとcolをいつも間違えてしまう

コマンドでちょっと列だけいじりたいときについcolと打ってしまう。

日経Linux [Linuxコマンド集] cut : テキスト・ファイルの各行から文節を取り出します

ファイルの各行から指定した文節を取り出す。取り出すとき，指定する数字は複数指定できる。また，"m-n"のように数字の間にハイフンを入れるとmからnまでのバイト，文字およびフィールドを指定でる。

Text::CSV::Simpleとか使って簡易コマンドつくると便利かもと思った。

29012007 Catalyst DBIC

DBICでprefetchとjoin

ありがたい。色々勉強になりました。

Hatena::Diary::Neko::kak 500 Internal Server Error - CatはしらんけどSledgeなら

基本コントローラーでRSを作りまくってstashにぶち込みまくって Viewの方で実際にクエリを実行する感じですね。

というわけでcookbookみながら悩んでみた。いじってるのは、こんな感じのテーブルなので、

多対多対多

user_bookmarksテーブルに対してイテレータをまわすことにした。あとcatlystだとautoっていう最初(のほうに)に呼ばれるメソッドがあるので、そこにユーザーが存在するかどうかのバリデーション書いた。

sub auto : Private {
    my ($self, $c, $action, $username) = @_;

    $c->stash->{user} = 
      $c->model('PblDB::User')->single({name => $username});

    unless (defined($c->stash->{user}) || $c->req->path =~ m!^bookmarks/?$!) {
    $c->response->redirect($c->uri_for('/'));
    return 0;
    }

    return 1;
}

sub default : Private {
    my ( $self, $c ) = @_;

    $c->stash->{user_bookmark_it} = 
    $c->model('PblDB::UserBookmark')->search(
          {user_id => $c->stash->{user}->id},
          {       
             prefetch => [qw/user bookmark/],
             join => [qw/user bookmark/],
             order_by => 'me.id DESC'
           }
           );
}

あと、ユーザーバリデーションしてる件に関しては、

livedoor クリップ - Hatena::Diary::Neko::kak 500 Internal Server Error - CatはしらんけどSledgeなら

個人的には、バリデーションでユーザがいるかどうかはチェックしないなー。そこでユーザの存在がわかっちゃうとあれかなと。まぁ、場合によるね。

とか

ってやった場合に、ユーザがいない場合にそんなメソッドがないよってエラーになっちゃうので、バリデーションしたというのが経緯なのだが、join使えば、

sub default : Private {
    my ( $self, $c, $action, $username ) = @_;

    $c->model('PblDB::UserBookmark')->search(
          {'user.name' => $username},
          {
             prefetch => [qw/user bookmark/],
             join => [qw/user bookmark/],
             order_by => 'me.id DESC'
          }
          );
}

と書けばよいのでこれでもいいかもしれんと思った。

あと、実際のサービスでそういった場合の処理はどうしてんのかなと気になったので僕が使っているSBSで調べてみた。

はてなブックマーク
トップページに飛ばされる
livedoor clip
unregistration.html
del.icio.us
エラーページ

ふむー。

28012007 京都

桂キャンパスいってきた

学生の時にお世話になった教授が今年で退官されるのだが、主催のシンポジウムがあるので、最初で（おそらく）最後の桂キャンパスに行ってきた。

僕が卒業してから何年か経ってからキャンパスが移ったのだが行くのは初めて。

建物は綺麗、でも、、、、

京都タワーちっちゃすぎ

かなり田舎だ。僕の頃は百万遍のすぐ近くで、飲みに行くにも本屋に行くにも便利だった。よく理学部前の焼き鳥屋台でアホほど呑んでたっけ。あと、やたらと量の多いカレー屋もよく行った(ダブカツ中とかよく言ってたけどそれより上のレベルは食えんかった)。

あとは交通が不便で、京都駅からのバスって一時間に一本くらいしかないのな。余裕をもってでたつもりが結局タイトなスケジュールになってしまい。昼飯食い損ねたし、帰りもやたらシビアで、電車に飛び乗ったので結局、京都グルメはせずにただ行ってただ帰ってきただけになってしまった。

セミナー後の懇親会では10年くらいぶりの同期にあったりとか、よく一緒にzettai-mu行ったりした後輩にあったりとかしていろいろ話せて楽しかった。オープンソースのオフィスソフトにかかわってたりとか、プレステの超有名レーシングソフトのプログラマーしてたりとか、みんな頑張ってんだナァと刺激を受けた。

むー僕もブーたれてばっかいないでとりあえず前向きに頑張らんと。とりあえずは今シーズン中に540くらいいけるようになりたい。

というのは冗談で、まぁ僕もいろいろと頑張らねばと思った次第。

あと、ここでも出てたけど、いろんなとこで量子化学のできるヒトが欲しいって話を最近よく聞くけど、量子化学というか理論的にきちんと考察できるような人材を製薬企業(だけじゃないけど)が求めてるってのは、研究ロジックが発見的なものから工学的に制御していく（していくべきだ）って方向にシフトしつつあるのかなとか思った。

というようなことはFDAも言ってんだっけ?

28012007 静岡