(cache) 一行掲示板 - gan2 の Ruby 勉強日記

PV/ 295044 役立つリンク集

.｡oO(参考というかほとんどそのまんまだったりする。)

全然何の工夫もしてないけど、

後から少しパワーアップさせたいと思う。

動作テストはローカルでAN HTTPDを動かしてそれでやった。

パワーアップさせたらXREAのサーバにアップしようかな。

#!/usr/local/bin/ruby
require 'cgi'
require 'kconv'
print "Content-Type: text/html\n\n"

cgi = CGI.new
log_filename = 'oneline-bbs.log'
MAX_LOG = 10
log = []

text = cgi['text']

# ログファイルの読み込み
open(log_filename){|f|
  f.each{|l|
    log << l
    break if log.size == MAX_LOG
  }
}

# ログファイルへの書き込み
if text
  log.unshift text

  open(log_filename, 'w'){|f|
    c = 0
    log.each{|l|
      f.puts l
      c += 1
      break if c == MAX_LOG
    }
  }
end

# HTML
print <<HTML
<html>
<head><title>一行掲示板</title></head>
<body>
<h1>一行掲示板</h1>
<form method="GET">
<input type="text" name="text" size="80" />
<input type="submit" />
</form>
<hr />
HTML

log.each{|l|
  puts "#{l.chomp}<br />"
}

print <<HTML
</body>
</htm>
HTML