Добро пожаловать,
Гость
. Пожалуйста,
войдите
или
зарегистрируйтесь
.
Не получили
письмо с кодом активации
?
1 час
1 день
1 неделя
1 месяц
Навсегда
Новости:
Начало
Помощь
Поиск
Календарь
Вход
Регистрация
Forum Webscript.Ru
»
Программирование
»
Perl
»
Объем картинки
« предыдущая тема
следующая тема »
Печать
Страницы: [
1
]
Вниз
Автор
Тема: Объем картинки (Прочитано 3038 раз)
0 Пользователей и 1 Гость просматривают эту тему.
Error202
Бесстрашный
Ветеран
Сообщений: 540
+1/-0
2
Объем картинки
«
:
22 Ноября 2005, 14:13:52 »
Пользователь вводит путь к картинке [Обзор...]
Она заливается на сервер и отображается...
Как ограничить размеркартинки 30Кб-ами и проверить, что там действительно картинка..?
Записан
Космическая игрушка
Error202
Бесстрашный
Ветеран
Сообщений: 540
+1/-0
2
Объем картинки
«
Ответ #1 :
22 Ноября 2005, 14:30:28 »
Всем спасибо... Объем решил проверять по мере скачивания...
А как быть с содержанием... Проверять первые байты?
Записан
Космическая игрушка
NeoNox
Координатор
Глобальный модератор
Ветеран
Сообщений: 3012
+0/-0
0
Объем картинки
«
Ответ #2 :
23 Ноября 2005, 11:55:24 »
my $content_type
=
lc
(
uploadInfo
(
$filename
)->{\
'Content-Type\'});
if ( $content_type =~ /^image/ )
{
...
}
Записан
The documentations is your friend
Error202
Бесстрашный
Ветеран
Сообщений: 540
+1/-0
2
Объем картинки
«
Ответ #3 :
24 Ноября 2005, 13:45:46 »
Спасибо, попробуем...
Записан
Космическая игрушка
Kannabismus
Заглянувший
Новичок
Сообщений: 18
+0/-0
0
Объем картинки
«
Ответ #4 :
25 Ноября 2005, 00:54:03 »
попробуйте еще
; use Image::Info qw/image_info/
; my $IMG = $q->upload(\'img\') #CGI
; my $imgi = image_info($IMG)
; if($imgi->{file_ext}!~/jpg|gif|png/)
{ # подходящие форматы
}
«
Последнее редактирование: 25 Ноября 2005, 01:03:57 от Kannabismus
»
Записан
Печать
Страницы: [
1
]
Вверх
« предыдущая тема
следующая тема »
Forum Webscript.Ru
»
Программирование
»
Perl
»
Объем картинки
Sitemap
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28