きまぐれ日記

_ [software] perl1行スクリプト

すぐ忘れちゃうので、メモっとく。行の中の項目の並び順を変えるスクリプト。元の3つ目、1つ目の順で2項目だけ出す例。

cat in.txt | perl -e 'while(<>){@f=split(" ",$_);print "@f[3] @f[1]\n";}'

_ [news] asahi.com：ベビーカー宙吊り事故から１週間　命守ったシートベルト - 関西

初美さんが先に降り、ベビーカーを前から抱えようとすると、ドアが閉まり左肩にぶつかった。再びドアが開いたので急いでベビーカーを降ろそうとしたら、ドアに左の取っ手が挟まれた。

車内の乗客数人がドアを手で開けようとしたが、電車は動き出した。「止めて！　止めて！」。初美さんは、数メートルひきずられジーンズの両ひざが破れた。ベビーカーは４５度ほど下向きになり、ホーム端の転落防止柵（さく）と車両のわずか約７０センチのすき間をすり抜け、姿が見えなくなった。「療が死ぬかもしれない」。ぼうぜんと見送るしかなかった。乗客が非常ボタンを押し、運転士と車掌がほぼ同時に非常ブレーキをかけ、電車は急停止した。

こわい。

昔から気をつけているんだけど、 高校生がエレベータに挟まれてしまった事件もあるし、あらゆる自動扉は疑ってかからないとならないね。 エレベータの乗り降りは素早く行い、子供は先に乗せない、先に降ろす。電車の乗り降りはベビーカーを横向きに持ち上げて体に引きつけ、扉に挟まれるリスクを極力減らしながら、なるべく素早く乗り降りするなど。とにかく、挟まれたり、親子が分断されたりするリスクを減らすように気をつけてる。

_ [net] クローラー退治

久々にhttpdのログを眺めてみたら、見知らぬクローラーのアクセスが増えてた。てことで、.htaccessに以下を記述。

# block oversea's crawler
RewriteCond %{HTTP_USER_AGENT}  Twiceler [NC,OR]
RewriteCond %{HTTP_USER_AGENT}  heritrix [NC,OR]
RewriteCond %{HTTP_USER_AGENT}  Baiduspider [NC,OR]
RewriteCond %{HTTP_USER_AGENT}  YodaoBot [NC,OR]
RewriteCond %{HTTP_USER_AGENT}  Yeti
RewriteRule ^.*$ [F]

# block trackback spam
RewriteCond %{HTTP_USER_AGENT}  ^TrackBack/1
RewriteRule ^.*$ [F]

_ [misc] 水栓部品届いた

INAXから22日に注文した部品が夕方に宅配で届いた。5日かかったか。3営業日ってことで、ま、そんなもんなんだろうけど、庭の水道とかならまだしも浴室なんだから5日も水栓使えないのは不便極まりないのだよ。とても満足できるサービスレベルじゃないねぇ。TOTOはどうなのかねぇ。