On Fri, 18 Jul 2003 at 12:03, Mike Harrison opined: MH:I have a perl program that allows a user to upload a file (either .jpg or MH:.gif) to the server, and returns a message if it exceeds a specified size MH:(in my case 100kB). Currently (and don't laugh - I am new to perl), I go MH:through the motions of uploading the file in 1024-byte blocks (in binary MH:mode), and increment a counter with each block. If the counter exceeds 100 MH:(i.e. greater than 100kB), then it exits the loop, displays a warning MH:message and deletes the file. MH: MH:I am sure there would have to be an easier and more efficient way of doing MH:this - that is, somehow finding out how large the file is without having to MH:download it first. MH: MH:Does perl have a module that can check the size of the file? And for that MH:matter, its type (.jpg, .gif etc.)?
hi mike - CGI provides a way to indicate if an form post exceeds a pre-determined size limit. it's the $CGI::POST_MAX variable, and if you wanted to limit uploads to 100kbytes (for example), you'd do something like this: use CGI; $CGI::POST_MAX = 100 * 1024; my $cgi = new CGI; if ($cgi->cgi_error) { # alert the user their post exceeded the limit exit(); } you can find out more information by reading perldoc CGI -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]