Объем картинки

[Error202]

Пользователь вводит путь к картинке [Обзор...]
Она заливается на сервер и отображается...

Как ограничить размеркартинки 30Кб-ами и проверить, что там действительно картинка..?

[Error202]

Всем спасибо... Объем решил проверять по мере скачивания...

А как быть с содержанием... Проверять первые байты?

[NeoNox]

my $content_type = lc (uploadInfo($filename)->{\'Content-Type\'});
if ( $content_type =~ /^image/ )
{

...
}

[Error202]

Спасибо, попробуем...

[Kannabismus]

попробуйте еще

; use Image::Info qw/image_info/
; my $IMG = $q->upload(\'img\') #CGI
; my $imgi = image_info($IMG)
; if($imgi->{file_ext}!~/jpg|gif|png/)
 { # подходящие форматы
 }