Программка на Perl

Нужно написать программу perl

Которая выполняет следующие функии.

Ввод имя каталога с клавиатуры,

поиск в этом каталоге и подкаталогах файлов

с расширением (.c, .cc, .cxx, .cpp, .C, .h, .hpp, .hxx, java)

и соответствующие им файлы с расширением

.о, .obj, .class если ничего не найдено то вывод сообщения "файлы не найдены",

если есть то сравнить являются ли файлы .о, .obj, .class

старше по времени создания чем (.c, .cc, .cxx, .cpp, .C, .h, .hpp, .hxx, java),

если есть старше то имена файлов записать в отдельный файл List.txt , так же вывести

сообщение " список файлов создан", если файлов старше нет то вывод сообщения " отличий не найдено"