ファイルが実行、書き込み、読み込みであるかどうか確認する
2023年12月7日
ファイルが実行、書き込み、読み込みであるかどうか確認する
引数としてファイルのパスを与えます
#!/usr/bin/perl
$file = $ARGV[0];
if(-x $file){
print “実行ok”.”\n”;
}else{
print “実行NG”.”\n”;
}
if(-w $file){
print “書き込みok”.”\n” ;
}else{
print “書き込みNG”.”\n”;
}
if(-r $file){
print “読み込みok” .”\n”;
}else{
print “読み込みNG”.”\n”;
}
file.plというファイルが実行、書き込み、読み込みであるかどうかを確認します
# perl ‘/home/hirano/Desktop/fileok.pl’ /home/hirano/Desktop/file.pl
ok
いちいちプロパティを開かないで確認したいときに使います。
