perl - ファイルがccperlに存在するかどうかを確認するにはどうすればよいですか?

Question

ファイルがccperlに存在するかどうかを確認する必要があります。

「存在する場合」を使用しようとしましたが、機能しませんでした。

コマンドの最初と最後に「 ' 」を使用することがありますが、別の方法はありますか?

ありがとう

Answer 1

おそらく必要なのは-f 'myfile'、名前がファイルに対応する場合に true を返す です。

これらのテストは多数あり、名前が存在することを確認するために使用-eできますが、ファイルまたはディレクトリ (または、Unix のリンクまたはパイプ) である可能性があります。

Answer 2

ccperl (または ratpl)については、使用されている perl のバージョンを確認してください (古い ClearCase バージョンでは、まだ 5.8.6 です)。これは、 で
テストされた特定のファイルの使用に影響を与える可能性があります。このスレッドは、末尾にスペースがあるファイルから示しています。-f

ここで、ClearCase ccperl スクリプトの例を確認できます。

if ( $n_file != 0 ) {
  while ( $file_name = shift(@file_list) )
  {
    if ( ! -f $vob_path.$dir_part.'/'.$file_name ) {
      print "not found $vob_path".$dir_part.'/'."$file_name \n";
    } else {
      $size1 = &file_size($file_name);
      $size2 = &file_size($vob_path.$dir_part.'/'.$file_name);
      if ( $size1 != $size2 ) {
        print "Err file $dir_part $file_name $size1 $size2\n";
      }
    }
  }
}

（オプションを使用して、数行下のディレクトリについてもテストし-dます）