Perl
Perl5

Perl5でファイルの読み書き

More than 1 year has passed since last update.

CPANには色々なファイル操作系のライブラリがあって、いつも「どれ使ってたっけ?」って悩んで時間を浪費するので、よく使うライブラリを書いとく。

用途によって色々選べるとおもうけど、ここでは軽い気持ちで使いたい奴のメモとする。


まとめ


ファイルの読み書き

File::Slurpを使うとお手軽。

use File::Slurp;

# 書き込み
write_file($file_path, +{ binmode => ':utf8' }, $content);

# 読み込み
read_file($file_path, binmode => ':utf8');


パス整形

File::Specを使うと環境に依存しないパス整形をしてくれる。

my $file_path = File::Spec->catfile('/usr/local/bin', 'perl');


実行ファイルを基準にパスを取得

File::Basename

use File::Basename;

my $dirname = dirname(__FILE__);

use lib File::Spec->catdir(dirname(__FILE__), '../lib');