Perl にファイルが存在するかどうかを確認する方法

Perl には、ファイルが存在するかどうかを確認するために使用できる便利なファイル テスト演算子のセットがあります。その中に -e があり、ファイルが存在するかどうかを確認します。この情報は、特定のファイルへのアクセスを必要とするスクリプトを操作しており、操作を実行する前にファイルが存在することを確認したい場合に役立つことがあります。

たとえば、スクリプトに依存するログまたは構成ファイルがある場合は、最初にそれを確認します。以下のサンプル スクリプトでは、このテストでファイルが見つからない場合に説明的なエラーが発生します。

#!/usr/bin/perl
$filename = '/path/to/your/file.doc';
if (-e $filename) {
print "File Exists!";
}

まず、テストするファイルへのパスを含む文字列を作成します。次に、ファイルが存在する場合にのみ print ステートメント (またはそこに配置したもの) が呼び出されるように、-e(exists) ステートメントを条件ブロックでラップします。反対の条件 (ファイルが存在しない) をテストするには、Unless 条件を使用します。

unless (-e $filename) {
print "File Doesn't Exist!";
}

その他のファイル テスト演算子

"and" (&&) または "or" (||) を使用できます。 ) 演算子は、2 つ以上のことを同時にテストします。その他の Perl ファイル テスト演算子は次のとおりです。

ファイルが読み取り可能かどうかを確認します

w ファイルが書き込み可能かどうかを確認します

-x ファイルが実行可能かどうかを確認します

-zファイルが空かどうかを確認してください

fファイルが通常のファイルかどうかを確認してください

-dファイルがディレクトリであるかどうかを確認してください

lファイルがディレクトリであるかどうかを確認してくださいシンボリック リンク

ファイル テストを使用すると、エラーを回避したり、修正が必要なエラーに気づいたりすることができます。

関連する推奨事項: 「Perl チュートリアル 」http://www.php.cn/course/list/39.html

この記事この記事は Perl でファイルが存在するかどうかを判断する方法についての記事です。

以上がPerl にファイルが存在するかどうかを確認する方法の詳細内容です。詳細については、PHP 中国語 Web サイトの他の関連記事を参照してください。