ファイルが実行ファイルかどうかを判定します。

説明

ファイルが実行ファイルかどうかを判定するために

‐x

を使用します。

#!/usr/bin/perl

$file = test.pl;

if(-x $file){

print “OK\n”;

}else {

print “NG\n”;

}

 

・$fileのフアイルが実行ファイルであればOKが表示されます
・$fileのフアイルが実行ファイルでなければNGが表示されます

まとめ

ファイルの属性をチェックすることで動作しない理由が判明します。
文字コード、Perlのパス、文法ミスが無いのに動かないときなど
灯台下暗しとしてありうるのでチェックするときに使えます。

他にもファイルが存在するか調べる、ディレクトリーが存在するか調べる。があります。
ロックファイル機構作るときにも役に立つので合わせて調べると良いと思います

Last Updated on 2025年9月14日6:40 pm by cgishop