オープンエラー - このようなファイルやディレクトリはありません

Question

私はFile::Findを使用してディレクトリツリーを実行しています。読み込みのために現在のファイルを開こうとすると、私はNo such file or directoryとなります。これは、ディレクトリツリー内のすべてのファイルで発生します。ここで

は、私がfind()に使うサブです：

sub { 
    if (-d) { 
     return; 
    } 
    if (-f) { 
     my $file = ${File::Find::name}; 
     open (my $IN, '<', '$file') or die "$!\n"; 
     while (<$IN>) { 
      ### Do some formatting. 
     } 
     close $IN; 
    } 
} 

それは行に失敗します。

open (my $IN, '<', '$file') or die "$!\n"; 

私はそれは多分リンクの問題だと思ったが、それでもfollow => 1オプションで、私はこれを取得しますエラー。

ところで、followがないと、私が見つけた最初のディレクトリの最初のファイルにあります。エラーは最後のディレクトリの最後のファイルにあります。（どちらの場合も最初ですファイルはFile::Findによって検査される）。

Answer 1

問題を解決しました。どうやら、引用符を使用しないで、open行の一重引用符を二重引用符で置き換えるか、あるいはそれ以上のものを置き換えることは、やりました。文字列リテラル'$file'は文字列$fileを生成しますが、この名前のファイルはありません。