The Overriding Built-in Functions section of the perlsub documentation provides
There is a second method that is sometimes applicable when you wish to
There was an earlier question on SO lamenting the difficulty of mocking the filetest operators (-f, -d, -x, ...)
-f
-d
-x