- Upload perl script,
 mr_gfd, 19:21 , 30-Янв-10 (1)>Решил сделать на своем сайте не большую форуму для заливки картинок (в
>данном случае аватаров). Подскажите как доработать скрипт (быдлокод) http://dpaste.com/152590/ чтобы он
>изменял название файла без расширения (ну например из переменной $name)? И
>что лучше изменить в скрипте вообще ? 0. use strict;
1. FastCGI
2. print "Content-Type: text/html\n\n"; - ? зачем? это прекрасно и сам CGI.pm умеет.
3. проверять успешность файловых операцийЖ open (UPLOAD_PIC, ">$dir/$file") || die $!;
4. Буфферизировать ввод-вывод.
5. Типы файлов проверять строже. К примеру, shell.jpg.cgi скрипт зальет без вопросов. А это уже ссыкотно.
6. Ну, и у fail() - это верх информативности, однозначно. Купите/скачайте книжку по перлу.
- Upload perl script, mr_gfd, 19:24 , 30-Янв-10 (2)
>[оверквотинг удален]
>1. FastCGI
>2. print "Content-Type: text/html\n\n"; - ? зачем? это прекрасно и сам CGI.pm
>умеет.
>3. проверять успешность файловых операцийЖ open (UPLOAD_PIC, ">$dir/$file") || die $!;
>4. Буфферизировать ввод-вывод.
>5. Типы файлов проверять строже. К примеру, shell.jpg.cgi скрипт зальет без вопросов.
>А это уже ссыкотно.
>6. Ну, и у fail() - это верх информативности, однозначно.
>
>Купите/скачайте книжку по перлу. вот, вдогонку
http://articles.sitepoint.com/article/uploading-files-cgi-pe...
|
Версия для распечатки
Upload perl script, 
