The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Catmandu::Fix::Condition::file_test - only execute fixes of file test is successfull

SYNOPSIS

    add_field('path','/home/njfranck')

    if file_test('path','dw')
        add_field('messages.$append','path is a directory')
        add_field('messages.$append','path is writable')
    end

ARGUMENTS

path
tests

List of file tests, all in one string.

Possible file tests (taken from <http://perldoc.perl.org/functions/-X.html>):

R File is readable by real uid/gid.

W File is writable by real uid/gid.

X File is executable by real uid/gid.

O File is owned by real uid.

e File exists.

z File has zero size (is empty).

s File has nonzero size (returns size in bytes).

f File is a plain file.

d File is a directory.

l File is a symbolic link (false if symlinks aren't supported by the file system).

p File is a named pipe (FIFO), or Filehandle is a pipe.

S File is a socket.

b File is a block special file.

c File is a character special file.

t Filehandle is opened to a tty.

u File has setuid bit set.

g File has setgid bit set.

k File has sticky bit set.

T File is an ASCII or UTF-8 text file (heuristic guess).

B File is a "binary" file (opposite of -T).

AUTHOR

Nicolas Franck, <nicolas.franck at ugent.be>

SEE ALSO

Catmandu::Fix