<a name=initialize>
<h3>初期化処理</h3>

<a href="#prologue"><code>prologue()</code></a>では変数の初期化などを行なう。
<code>%SIG</code>に関数名を指定しておくと、
signalが発生したときに<code>$SIG{シグナル名}</code>の関数が呼ばれる。
ここではSIGINTなどを受け取った時に
<a href="#finish"><code>finish()</code></a>が呼ばれるようにしている。

<a name="prologue"></a>
<pre file=wtangle>

sub prologue {
  require 'cacheout.pl'; # <a name=cacheout>複数ファイル出力ライブラリ</a>
  if($#ARGV < 0){
    print STDERR "wtangle --- Web Tangle\n";
    print STDERR "Usage: wtangle documentfiles\n";
    exit 0;
  }
  $SIG{'INT'} = $SIG{'TERM'} =
  $SIG{'QUIT'} = $SIG{'HUP'} = 'finish';
}
</pre>

<h3>メインルーチン</h3>