ファイルを作成する

#!/usr/bin/env perl
use strict;
use warnings;
use Path::Class;

my $fh = file('tmp.txt')->openw;
$fh->close;

__END__

作るだけであれば、touchでもよいと思います。

See also:
http://d.hatena.ne.jp/perlcodesample/20080519/1211252829