Forum Webscript.Ru

Программирование => Perl => Тема начата: Timofey от 01 Декабря 2001, 15:11:59

Название: ограничения размера файла при upload\'e
Отправлено: Timofey от 01 Декабря 2001, 15:11:59

Делаю upload

use CGI qw/:standard/;
if (param())
{

my $path = "tmp/";
my $in=param(\'picture\');
my ($name) = $in =~ m#([^\\\\/:]+)$#;

open(OUT,">$path$name");
binmode(OUT);
while (<$in> )
{
print OUT $_;
}
close(OUT);

}

Как не делать upload если размер файла больше например 100kb

Название: ограничения размера файла при upload\'e
Отправлено: MHz от 01 Декабря 2001, 18:39:46

Приветствую.
Во-первых, максимальный размер файла для upload задается в канфигурационном файле  "upload_max_filesize".
Во-вторых, в той же форме создается скрытое поле: , которое проверяет сам броузер.
В третьих, можно и почитать: http://www.php.net/manual/en/features.file-upload.php - по моему, описано все хорошо.

Название: ограничения размера файла при upload\'e
Отправлено: Timofey от 03 Декабря 2001, 09:38:23

во-первых я не совсем понял,что за такой конфигурационный файл "upload_max_filesize".
во-вторых, как работать с  полем: , которое проверяет сам броузер.
И вообще все это должно работать на Perl\'e и через форму передаются еще другие параматры кроме самого файла