From: Fujikawa Norihide <ruby@...>
Date: 2002-01-20T18:25:40+09:00
Subject: [ruby-list:33445] Re: CGI でキャッシュ

てんしゅう@自己ふぉろぉぉ。


できたような気がする。
皆様お騒がせしました。


#!/usr/local/bin/ruby
require 'cgi'
@cgi=CGI::new('html4Tr')
if File.exist?("cache.dat") && 
   File.mtime("cache.dat") > 0 #とりあえず0にしているだけ
  @cgi.out("charset"=>"euc-jp"){  
    open("cache.dat") do |f|
      f.read
    end
  }
else
  File.open("cache.dat",'w') do |f|
    f.write(
      @cgi.html("lang"=>"ja", "PRETTY"=>""){
        @cgi.body(){
          @cgi.h1(){"CGIてすと"}
          #など。。。
        }
      }
    )
  end
  @cgi.out("charset"=>"euc-jp"){  
    open("cache.dat") do |f|
      f.read
    end
  }
end


--
Fujikawa Norihide
mailto:ruby@tensyuu.com