7.1 ファイルをオープンする

• 2つの引数で指定する場合

open(SOURCE, "< $path") or die;
open(SINK, "> $path") or die;

• 3つの引数で指定する場合

open(SOURCE, "<", $path) or die;
open(SINK, ">", $path) or die;

• sysopen関数を使用する

use Fcntl;
sysopen(SOURCE, $path, O_RDONLY) or die;
sysopen(SINK, $path, O_WRONLY, 600) or die;

• 未定義のスカラー変数を使用

open(my $fh, "<", $path) or die;