[ главная ]   [ рейтинг статей ]   [ справочник радиолюбителя ]   [ новости мира ИТ ]



Ответов: 0
25-02-12 07:01







   Web - программирование
PHP


ASP






XML



CSS

SSI





   Программирование под ОС











   Web - технологии








   Базы Данных









   Графика






Данные




Web - программирование / PERL /

Пример загрузки файла в Perl

Этот пример показывает возможность загрузки файла через форму при помощи модуля CGI. Очень просто и красиво.

#!/usr/bin/perl -w

$basedir = "/usr/home/kuku/site";
$donepage = "http://www.lala.ru/~kuku/site";
use CGI;

$onnum = 1;
while ($onnum != 11)
{
 my $req = new CGI;
 my $file = $req->param("FILE$onnum");
 if ($file ne "")
 {
     my $fileName = $file;
     $fileName =~ s!^.*(|/)!!;
     $newmain = $fileName;
     open (OUTFILE,">$basedir/$fileName");
     print "$basedir/$fileName";
     while (my $bytesread = read($file, my $buffer, 1024))
     {
         print OUTFILE $buffer;
     }
     close (OUTFILE);
 }
 $onnum++;
}

print "Content-type: text/htmln";
print "Location:$donepagenn";


к нему html'ка:

<form ENCTYPE="multipart/form-data" method=post>
 <p>File 1: <input TYPE="file" NAME="FILE1" size="20"> File 2:
 <input TYPE="file" NAME="FILE2" size="20"> File 3:
 <input TYPE="file" NAME="FILE3" size="20"> File 4:
 <input TYPE="file" NAME="FILE4" size="20"> File 5:
 <input TYPE="file" NAME="FILE5" size="20"> File 6:
 <input TYPE="file" NAME="FILE6" size="20"> File 7:
 <input TYPE="file" NAME="FILE7" size="20"> File 8:
 <input TYPE="file" NAME="FILE8" size="20"> File 9:
 <input TYPE="file" NAME="FILE9" size="20">
 <input TYPE="submit" VALUE="Upload!">
</p>
</form>




Комментарии

lyl8000
23-07-2010   
Спасибо за пример.
Сделал похожий скрипт - работает! Ура!

 Ваш комментарий к данному материалу будет интересен нам и нашим читателям!



Последние статьи: Web - программирование / PERL /

CGI интерфейс
24-10-2009   

Большое количество World Wide Web приложений основано на использовании внешних программ, управляемых Web сервером... подробнее

Кол. просмотров: общее - 4203 сегодня - 0

Upload File
24-10-2009   
Кол. просмотров: общее - 3305 сегодня - 0

Программирование для Веб: Загрузка файлов на сервер и посылка e-mail с вложениями
24-10-2009   

Одним из популярнейших вопросов во всевозможных форумах является вопрос «Как загрузить файл на сервер?». А ведь на самом деле это не так сложно, как кажется на первый взгляд. И чтобы не было совсем легко – пусть скрипт, который приведен ниже еще и посылает этот файл по почте, в виде вложения... подробнее

Кол. просмотров: общее - 3558 сегодня - 0

Защита WWW-сценариев от несанкционированного копирования и модификации
24-10-2009   

В статье рассматривается один из основных подходов к генерации динамического контента в среде веб-приложений, а именно использование веб-сценариев и CGI, и применительно к ним, методы защиты исходных текстов от несанкционированного копирования и модификации... подробнее

Кол. просмотров: общее - 3352 сегодня - 0

Как защитить мою программу, чтобы никто не смог её прочитать?
20-10-2009   

Disclaimer: все приведённые примеры предназначены для демонстрации принципов, а вовсе не являются готовыми к использованию решениями... подробнее

Кол. просмотров: общее - 3360 сегодня - 0



  WWW.COMPROG.RU - 2009-2012 | Designed and Powered by Zaipov Renat | Projects