Как определить, является ли файл изображением в Perl

Чтобы установить некоторые переменные, мне нужна информация, является ли данный файл на моем сервере изображением. Я ничего не знаю о файле, кроме его местоположения и имени.

Есть ли способ определить, является ли файл изображением, БЕЗ просмотра расширения файла?