使用如果與循環

Question

我想重複以下命令，如果文件$grib不存在，直到它存在..什麼是引入循環以反覆檢查文件是否存在的最佳方法是什麼？

$grib = "model.grb"; 

if (-e $grib) { 
    print "File $grib exists"; 
} 
else { 
    print "without file $grib"; 
} 

Answer 1

您需要一個while循環。

while (!-e $grin) { 
    # do stuff... 
} 

print "file $grib exists\n"; 

請參閱compound statements in perlsyn。