ファイルが空かどうかを調べる

Last Updated on 2023年12月11日 by Dotmatrix

空のファイルか調べる

#!/usr/bin/perl

$file = $ARGV[0];

if(-s $file){

print “ファイルの中身があります”;

}else{

print “ファイルの中身がありません。からです”;

}

新規ファイル作成で上書き保存するときに確認するときに使います

# perl ‘/home/hirano/Desktop/kara.pl’ ‘/home/hirano/Desktop/file.pl’
ファイルの中身があります