Узнать тип файла

[Inecs]

Возник вот какой вопрос, скажем загружаю на диск upload файлы или же я загружаю файлы из сети посредством LWP и сохраняю в виде "что-то-там.tmp". Как можно узнать какой именно файл сохранён, скажем картинка (jpg,gif,png), архив (zip, rar,arj, ha) или экзешник...
Спасибо.

[NeoNox]

File::MimeInfo ?

[Inecs]

Опробовал. Но ему нужны еще и mime типы. А их нужно устанавливать отдельно. Вот что он пишет

You don\'t seem to have a mime-info database.
See http://freedesktop.org/Software/shared-mime-info

Есть ещё варианты?

[NeoNox]

Ну так и установи, в чем проблема?

[NeoNox]

Inecs как считаешь, откуда apache берет mime-info?
Правильно, из файла mime.types.

[Inecs]

Если всё так было просто. Хостер - гад, устанавливать не хочет...

Вот поэтому и спрашиваю, есть ли ещё способы?

[cr4ck3r]

Копируешь в свой домашний каталог файл mime.types, затем:

use File::MimeInfo;
push(\'home/user\',@File::MimeInfo::DIRS);
  my $mime_type = mimetype($file);