Lines Matching refs:exists

38     my $exists = FS->catdir(qw(exists));
42     ok mkdir $exists;
43     END { rmdir $exists }
45     ok chmod 0555, $exists, 'make read only';
48           if -w $exists; # these tests require a directory we cant read
50     is_deeply [can_write_dir($exists)], [0, $exists];
51     is_deeply [can_write_dir($subdir)], [0, $exists, $subdir];
53     ok chmod 0777, $exists, 'make writable';
54     ok -w $exists;
55     is_deeply [can_write_dir($exists)], [1, $exists];
58                $exists,