Daily Square

ActivePerlへの新しいPerlモジュールのインストールには、PPM install が楽であるが、そのためのPPDファイルを見つけるのに一苦労である。

いろいろ探した結果、以下のサイトが便利であることがわかった。

http://trouchelle.com/perl/ppmrepview.pl

このページの下のほうに、ActivePerlの各バージョンからキーワード検索、あるいは、アルファベットのインデックスを使って、最新のPPDファイルにとどりつくことができる。

さて、PostgresにアクセスするためのDBD-pgのインストールは、

ppm install http://trouchelle.com/ppm/DBD-Pg.ppd　 (Perl5.8)
ppm install http://trouchelle.com/ppm10/DBD-Pg.ppd (Perl5.10)

で完了する。残念ながら現時点で Perl5.12向けには用意されていない。

しかしながら、実際に動かすとDLLがないといって怒られるので、
Postgresのインストールディレクトリから、DLLを /perl/site/bin にコピーして、ようやく動かすことができた。

pgから始まらないテーブル名の一覧を表示するには以下のような感じでしょうか。
---

#!/usr/bin/perl

use DBI;

my $dbname = "postgres";
my $host = "localhost";
my $port = "5432";
my $user = "postgres";
my $pw = "";
my $db = DBI->connect("dbi:Pg:dbname=$dbname;host=$host;port=$port;", "$user", "$pw");

my $sql = "SELECT tablename from pg_tables where tablename not like 'pg%';";
my $st = $db->prepare("$sql;");
my $res = $st->execute;
while(@res = $st->fetchrow){
print "$res[0]\n";
}

今年になってから、まさに幸運というか、それほど大きな電車遅延の被害にあっていなかった。

ところが、先週金曜日の京浜東北線の日暮里駅での人身事故を発端に、昨日は台風の影響を避け横須賀線を選択したもののその後の線路立ち入りの影響をもろに被り、品川駅でずいぶんと待たされてしまった。

今朝も　京浜東北線の見合わせに巻き込まれ、連荘での遅延にぐったり。

今日（2010年5月25日）の20:08頃に、茅ヶ崎〜平塚駅間で発生した人身事故の影響で、久しぶりに遅れる羽目となった。

東京駅で東海道線ホームに出ると20:23発の電車が立ち往生。すぐに横須賀線ホームに移動した。横須賀線上り・すなわち総武線快速線も少し遅れているようだった。

横須賀線も東海道線の影響でいつもより混んでいるんだろう。3月以来、久しぶりに乗る帰りの横須賀線だった。

東海道線は21:28に運転再開されたようだ。東京駅ホームに出たときは、事故付近の電車の再開は21:15ごろとアナウンスされていた。

このところ肩こりがひどいのだが、どうも夜寝ているときに噛む力が強いというのが原因のようである。簡単には直りそうもないというのが現実なのかもしれない。

肩こりをなんとかしたいと思っていると、マッサージしてくれるよさそうなマシンがあったので、メモしておく。楽天でも2万円以下で買えるようなので、よいかもしれない。山善という会社のＹＡＭＡＺＥＮマッサージ器YHM-80は、肩にかけて、その自重で肩をマッサージしてくれる。

今年のダイヤ改正で、とうとう横須賀線の武蔵小杉駅が開業するようですね。ただし、既存の南武線との乗り換えには約8分かかるという。まだ仮の連絡通路ということだが、1年後の本格開業のときには、もう少し短くなるのだろうか。

さて、横須賀線にひとつ多く駅ができるということで、その分だけ目的地までの時間がかかることになる。どうも時刻表によると2〜3分のロスになるのだろう。

朝7:25大船発の1本が増発となるだけで、逆に大船始発電車の時刻が微妙に使いにくくなっている。7:50発は7:52発となり、さらに2分出発が遅くなり、新橋駅着は5分遅れる。それぞれ時間が遅くなっているため、同じ電車に乗ろうとすると会社に到着できる時間も5分程度遅くなるといった感じだ。

武蔵小杉ということで利用客も増えて、しかもその分余計に時間がかかるようになるんだから、朝の通勤時間帯はもっと劇的に増やすべきなんじゃない。
？

Windows7がブートしなくなったので、いろいろ調べてみたが、XPからはだいぶ変わってしまっている。昔のように fdiskでMBRを修正するようにはいかないようだ。

いろいろトライしてみたが、何がよかったのかわからないが、メモ書きしておく。

�@bootsect
起動をWindows7にする
�Abcdedit
　ブートするための情報を記録する
�Bdiskpart
ディスクをアクティブにする

新年になって順調であったが、昨日、今日と2日連続で京浜東北線で遅延に巻き込まれた。いずれも朝の通勤時間帯。

昨日は、8分遅れ、今日は、鶴見〜新子安間での線路内立ち入りで18分遅れとなった。あわせて、今年の遅れは26分。

Chromeのベータ版が久しぶりにアップデートしたと思ったら、メジャーバージョンが3.0から4.0にアップしていた。Chromeのアップデート機能により、何の問い合わせもなくアップデートされた。

これまでもいつの間にかアップデートしていることがあったが、Webを探してもどのようにアップされたのか、バージョンズの情報はなかなか見つからない。

新しいバージョンは、4.0.223.16。このバージョンの機能としては、ブックマークの同期機能が示されている。そのほかには、速度の向上が謳われている。とくに速くなったという感触はない。

台風18号は意外と影響が少なかったと、朝になって雨も小降りになって、今にも止みそうだと思ったのが大間違い。

駅についてみれば、大変な騒ぎ。早朝はまだ動いていたようであるが、出勤時間の8時ごろには、関東圏のJR各線は次から次へと運転見合わせとなり、出勤の足が途絶えてしまった。多摩川の風速が基準を超えているらしい。大船駅もすごい風が吹き荒れていた。

まだ、大船駅から出る電車もあるようだが、このまま駅で待って、その電車に乗り込んでも目的の新橋駅には到底たどり着けないと判断し、ゆっくりパソコンで作業できる場所に避難した。

その場所でゆっくり2時間、２ちゃんねるを見ながら、運転再開は正午ごろと判断。1時間ぐらい前に、ホームに停車中の電車のガラガラになったシートに場所を移そうと駅に向かったが、東海道線に停車中の電車は満席で立って待っている人もいるぐらい。横須賀線の電車のいつも乗っている車両に決めて待った。

結局のところ、運転再開は11時57分。東海道線よりも早く再開するということで、多くの人が横須賀線に移動してきて、満員状態で出発。その後は、あまり遅れることもなく、スムーズに運行。最終的にいつもより3時間遅れの到着となった。人生最悪とまではいかなかったが、台風でこれほどまでに遅れるとは…

10月に入ってから安定しないですねぇ。
今日は朝っぱら人身事故ですよ。
しかし、なぜ横須賀線？と思ってしまう。

10月7日の今日は、6時44分頃に横浜駅で人身事故ということです。
運転再開が8時21分ということですので、ずいぶん時間がかかりましたね。そのせいで、運休するわ、電車がつまったりということで、異常な混雑ぶり。

どうも横須賀線は東京駅で折り返しするなかで、本数を減らしているのだろうか。それとも、ある程度客がいっぱいにならないと東京駅発を出さないのだろうか。折り返しをスムーズにやっていれば、こんな遅延まで引き起こさないと思う。