====== Perl - 基礎 ======

===== インストール（Mac OS X） =====

<sxh bash; gutter: false>
$ sh Configure -Dprefix=/usr/local -Dusethreads -Dusemultiplicity -des
$ make
$ sudo make install
$ make clean
</sxh>

===== これだけは押さえておきたい =====

<sxh perl>
BEGIN {
  use File::Basename;
  chdir dirname( $0 );
}
</sxh>

Perlスクリプトファイルの存在するディレクトリをカレントディレクトリにする。

<sxh perl>
use strict;
</sxh>

myやlocalで宣言されていない変数をいきなり使うとエラーになる。\\ 
通常は宣言せずいきなり変数を使うことが出来るが、これにより厳格な扱いとなる。\\ 
誤動作を防いだりデバックをし易くするためにも必ずつける。

<sxh perl>
use warnings;
</sxh>

いくつかの警告メッセージを出してくれるようになるため、\\ 
安全なスクリプトを書くためにも是非つけるようにしたい。

<sxh perl>
use utf8;
</sxh>

スクリプトがUTF-8で書かれていることを宣言する。\\ 
このことにより、ソースコード中の文字列にはUTF-8フラグがつく。\\ 
この場合、当然コードもUTF-8で書く必要がある。

<sxh perl>
use open ":utf8";
</sxh>

入出力をUTF-8とする。

<sxh perl>
use open ":std";
</sxh>

標準入出力も上記に準ずる。

===== まとめ =====

Perlスクリプトの先頭には以下を決まり文句として追加しておくとよい。

<sxh perl>
#!/usr/bin/perl

BEGIN {
  use File::Basename;
  chdir dirname( $0 );
}

use strict;
use warnings;
use utf8;
use open ":utf8";
use open ":std";
</sxh>