Операторы проверки файлов в Perl. Почему у меня не работает? =)

http://dl.dropbox.com/u/11489485/code/wtf/test.pl.html
Perl v5.12.4
Пару строк, которые пока по непонятной причине у меня не работают я выделил красным цветом.

Примечание:
До меня дошло в чём косяк!
Надо писать полные пути.
Вот так:
print "файл\n" if -f $_[0]."/".$files[$j];
print "каталог\n" if -d $_[0]."/".$files[$j];
всё работает.

Примечание:
2 бригадир телепатов
я основывался на официальной документации
http://perldoc.perl.org/functions/-X.html

В какой версии появилось — не знаю, а выяснять лень.
Используй современную, не ошибёшься =)

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.