我从这样的perl脚本调用find：
my $one_file = `find $search_dir -name "\*.$refinfilebase.search" -print | head -n 1`;
如果我从shell执行它,我没有错误.此外,它将正确的值返回到$one_file,但我在提示符下得到了这个：
find: write error: Broken pipe
那为什么会这样？我怎样才能摆脱这个发现：写错误：管道信息损坏？