makeindex.rb

   1 # -*- coding: utf-8 -*-
   2 require './bookdesc'
   3
   4 workdir = "~/amazonrank"
   5 htmlfile = workdir.dup << "/index.html"
   6 isbnfile = "ISBN.txt"
   7
   8 open(htmlfile, "w") { |f|
   9   f.print <<EOS
  10 <?xml version="1.0" encoding="UTF-8"?>
  11 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
  12 <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="ja">
  13 <head>
  14 <meta http-equiv="Content-Type" content="text/html;charset=UTF-8" />
  15 <title>Amazonランキング</title>
  16 </head>
  17
  18 <body>
  19 <h1>Amazonランキング</h1>
  20 <ul>
  21 EOS
  22
  23   open(isbnfile, "r") { |lines|
  24     while l = lines.gets
  25       l = l.chomp
  26       f.print "<li><a href=\"", l, ".html\">"
  27       f.bookdesc(l)
  28       f.print "</a> <a href=\"http://www.amazon.co.jp/dp/", l, "\">Amazon</a></li>\n"
  29     end
  30   }
  31   f.print <<EOS
  32 </ul>
  33 </body>
  34 </html>
  35 EOS
  36 }