趣味的にっき

<前の日 | 次の日>

2006-01-31

■[ウクレレ] 関レレ2月例会のお知らせ 00:20

http://kanlele.hp.infoseek.co.jp/

公開されています。僕も行く予定です。二次会、今月は何弾こうかな。

■[Ruby] Webページのタイトルを取得するそのに 00:45

id:ha-tan:20060130:1138546013の続きです。

やっぱり</head>か<body>がきたら処理をあきらめるようにしました。あとタイトル文字列の両端の空白を削除するようにしました。

#!/usr/bin/env ruby
# -*- ruby -*-

require 'open-uri'
require 'kconv'

ARGV.each do |uri|
  open(uri, 'r') do |file|
    buf = ''
    while line = file.gets
      buf << line
      if buf =~ /<title[^>]*>([^<]*)<\/title>/im
        puts Kconv.kconv($1.strip, Kconv::EUC)
        break
      end
      break if buf =~ /(?:<\/head>|<body[^>]*>)/i
    end
  end
end

そうそう、上のプログラムではopen-uriを使っています。普段はこんな感じでURLを指定するのですが、

$  ./htmltitle.rb http://d.hatena.ne.jp/ha-tan/

試験用にローカルファイルを指定することもできます。

$  ./htmltitle.rb local_file.html

Web サーバ用意しなくていいので楽です。open-uriらぶ。

■寝坊しました 00:26

社会人失格ですorz タクシー使っても間に合う時間ではありませんでした。是正処置として「携帯電話のアラーム機能を使って二重チェックする」ことで歯止めとしたいと思います。

■インフルエンザが蔓延しそう 00:33

いっしょに仕事している人達がバタバタ逝きそうな気配です。今職場にはウイルスが大量にバラまかれています。自己防衛のため職場ではマスクがかかせません。僕だけ残して逝かないでー。

■甘いに似てます 00:26

「廿」は「にじゅう」と読むようです。今日知りました。

■[帰宅] 00:20

22:30ごろ帰りました。

[コメントを書く]

トラックバック - http://d.hatena.ne.jp/ha-tan/20060131

六日目・・・。