Help for this page
foreach (1,2,3,4) { print "dir1\n" if glob("dir1/f*"); print "dir2\n" if glob("dir2/f*"); }
use strict; ... 8: dir1/f2 9: 10: dir1/f1
use strict; use warnings; ... dir1/f1 dir1/f1 dir1/f1