Программирование => 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 и через форму передаются еще другие параматры кроме самого файла