add pleac 8.4

kzfm · Jul 12, 2012 · 5f3865f · 5f3865f
1 parent e2a92ec
commit 5f3865f
Show file tree

Hide file tree

Showing 4 changed files with 46 additions and 10 deletions.
diff --git a/pleac.html b/pleac.html
@@ -130,7 +130,7 @@ <h3>プログラム7.2        lockarea<a class="headerlink" href="#lockarea" tit
 <h2>8 章    ファイルコンテンツ<a class="headerlink" href="#id20" title="Permalink to this headline">¶</a></h2>
 <div class="section" id="id21">
 <h3>レシピ8.1 継続文字のある行を読む<a class="headerlink" href="#id21" title="Permalink to this headline">¶</a></h3>
-<p><a class="reference external" href="http://docstore.mik.ua/orelly/perl/cookbook/ch08_02.htm">8.1. Reading Lines with Continuation Characters</a></p>
+<p><a class="reference external" href="http://docstore.mik.ua/orelly/perl/cookbook/ch08_02.htm">Reading Lines with Continuation Characters</a></p>
 <p>もとのレシピは行ごとに読んで末尾にバックスラッシュついてるかチェックし
 てるのだけど、書いたコードは\nを探して無視するようになっている。</p>
 <div class="highlight-haskell"><div class="highlight"><pre><span class="kr">import</span> <span class="nn">System.Environment</span>
@@ -151,7 +151,7 @@ <h3>レシピ8.1 継続文字のある行を読む<a class="headerlink" href="#i
 </div>
 <div class="section" id="id22">
 <h3>レシピ8.2 ファイルの行数（段落数、レコード数）をカウントする<a class="headerlink" href="#id22" title="Permalink to this headline">¶</a></h3>
-<p><a class="reference external" href="http://docstore.mik.ua/orelly/perl/cookbook/ch08_03.htm">8.2. Counting Lines (or Paragraphs or Records) in a File</a></p>
+<p><a class="reference external" href="http://docstore.mik.ua/orelly/perl/cookbook/ch08_03.htm">Counting Lines (or Paragraphs or Records) in a File</a></p>
 <p>applicative</p>
 <div class="highlight-haskell"><div class="highlight"><pre><span class="nf">countlines</span> <span class="ow">=</span> <span class="p">(</span><span class="n">length</span> <span class="o">.</span> <span class="n">lines</span><span class="p">)</span> <span class="o">&lt;$&gt;</span> <span class="n">readFile</span>
 </pre></div>
@@ -163,7 +163,7 @@ <h3>レシピ8.2 ファイルの行数（段落数、レコード数）をカウ
 </div>
 <div class="section" id="id23">
 <h3>レシピ8.3 ファイル内のすべての単語を処理する<a class="headerlink" href="#id23" title="Permalink to this headline">¶</a></h3>
-<p><a class="reference external" href="http://docstore.mik.ua/orelly/perl/cookbook/ch08_04.htm">8.3. Processing Every Word in a File</a></p>
+<p><a class="reference external" href="http://docstore.mik.ua/orelly/perl/cookbook/ch08_04.htm">Processing Every Word in a File</a></p>
 <p>words関数で単語のリストに分解してmapすればいい。</p>
 <div class="highlight-haskell"><div class="highlight"><pre><span class="kr">import</span> <span class="nn">System.Environment</span>
 
@@ -176,6 +176,16 @@ <h3>レシピ8.3 ファイル内のすべての単語を処理する<a class="he
 </div>
 <div class="section" id="id24">
 <h3>レシピ8.4 ファイルを行単位または段落単位で逆向きに読む<a class="headerlink" href="#id24" title="Permalink to this headline">¶</a></h3>
+<p><a class="reference external" href="http://docstore.mik.ua/orelly/perl/cookbook/ch08_05.htm">Reading a File Backwards by Line or Paragraph</a></p>
+<p>reverseする</p>
+<div class="highlight-haskell"><div class="highlight"><pre><span class="kr">import</span> <span class="nn">System.Environment</span>
+
+<span class="nf">main</span> <span class="ow">=</span> <span class="kr">do</span>
+  <span class="n">args</span> <span class="ow">&lt;-</span> <span class="n">getArgs</span>
+  <span class="n">content</span> <span class="ow">&lt;-</span> <span class="n">readFile</span> <span class="p">(</span><span class="n">args</span><span class="o">!!</span><span class="mi">0</span><span class="p">)</span>
+  <span class="n">print</span> <span class="o">$</span> <span class="n">reverse</span> <span class="o">.</span> <span class="n">lines</span> <span class="o">$</span> <span class="n">content</span>
+</pre></div>
+</div>
 </div>
 <div class="section" id="id25">
 <h3>レシピ8.5 成長するファイルを追いかけながら読む<a class="headerlink" href="#id25" title="Permalink to this headline">¶</a></h3>

diff --git a/pleac.rst b/pleac.rst
@@ -82,7 +82,7 @@
 レシピ8.1 継続文字のある行を読む
 ---------------------------------
 
-`8.1. Reading Lines with Continuation Characters <http://docstore.mik.ua/orelly/perl/cookbook/ch08_02.htm>`_ 
+`Reading Lines with Continuation Characters <http://docstore.mik.ua/orelly/perl/cookbook/ch08_02.htm>`_ 
 
 もとのレシピは行ごとに読んで末尾にバックスラッシュついてるかチェックし
 てるのだけど、書いたコードは\\nを探して無視するようになっている。
@@ -107,7 +107,7 @@
 レシピ8.2 ファイルの行数（段落数、レコード数）をカウントする
 -------------------------------------------------------------
 
-`8.2. Counting Lines (or Paragraphs or Records) in a File <http://docstore.mik.ua/orelly/perl/cookbook/ch08_03.htm>`_
+`Counting Lines (or Paragraphs or Records) in a File <http://docstore.mik.ua/orelly/perl/cookbook/ch08_03.htm>`_
 
 applicative
 
@@ -124,7 +124,7 @@ Monad
 レシピ8.3 ファイル内のすべての単語を処理する
 ---------------------------------------------
 
-`8.3. Processing Every Word in a File <http://docstore.mik.ua/orelly/perl/cookbook/ch08_04.htm>`_
+`Processing Every Word in a File <http://docstore.mik.ua/orelly/perl/cookbook/ch08_04.htm>`_
 
 words関数で単語のリストに分解してmapすればいい。
 
@@ -140,6 +140,19 @@ words関数で単語のリストに分解してmapすればいい。
 レシピ8.4 ファイルを行単位または段落単位で逆向きに読む
 -------------------------------------------------------
 
+`Reading a File Backwards by Line or Paragraph <http://docstore.mik.ua/orelly/perl/cookbook/ch08_05.htm>`_ 
+
+reverseする
+
+.. code-block:: haskell
+
+   import System.Environment
+   
+   main = do
+     args <- getArgs
+     content <- readFile (args!!0)
+     print $ reverse . lines $ content
+
 レシピ8.5 成長するファイルを追いかけながら読む
 -----------------------------------------------
 

diff --git a/searchindex.js b/searchindex.js
diff --git a/sources/pleac.txt b/sources/pleac.txt
@@ -82,7 +82,7 @@
 レシピ8.1 継続文字のある行を読む
 ---------------------------------
 
-`8.1. Reading Lines with Continuation Characters <http://docstore.mik.ua/orelly/perl/cookbook/ch08_02.htm>`_ 
+`Reading Lines with Continuation Characters <http://docstore.mik.ua/orelly/perl/cookbook/ch08_02.htm>`_ 
 
 もとのレシピは行ごとに読んで末尾にバックスラッシュついてるかチェックし
 てるのだけど、書いたコードは\\nを探して無視するようになっている。
@@ -107,7 +107,7 @@
 レシピ8.2 ファイルの行数（段落数、レコード数）をカウントする
 -------------------------------------------------------------
 
-`8.2. Counting Lines (or Paragraphs or Records) in a File <http://docstore.mik.ua/orelly/perl/cookbook/ch08_03.htm>`_
+`Counting Lines (or Paragraphs or Records) in a File <http://docstore.mik.ua/orelly/perl/cookbook/ch08_03.htm>`_
 
 applicative
 
@@ -124,7 +124,7 @@ Monad
 レシピ8.3 ファイル内のすべての単語を処理する
 ---------------------------------------------
 
-`8.3. Processing Every Word in a File <http://docstore.mik.ua/orelly/perl/cookbook/ch08_04.htm>`_
+`Processing Every Word in a File <http://docstore.mik.ua/orelly/perl/cookbook/ch08_04.htm>`_
 
 words関数で単語のリストに分解してmapすればいい。
 
@@ -140,6 +140,19 @@ words関数で単語のリストに分解してmapすればいい。
 レシピ8.4 ファイルを行単位または段落単位で逆向きに読む
 -------------------------------------------------------
 
+`Reading a File Backwards by Line or Paragraph <http://docstore.mik.ua/orelly/perl/cookbook/ch08_05.htm>`_ 
+
+reverseする
+
+.. code-block:: haskell
+
+   import System.Environment
+
+   main = do
+     args <- getArgs
+     content <- readFile (args!!0)
+     print $ reverse . lines $ content
+
 レシピ8.5 成長するファイルを追いかけながら読む
 -----------------------------------------------