|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Artem Chuprina 2:5020/371.32 06 Oct 2000 12:40:55 To : news@insan.al.ru Subject : Re: В чем проблема? (upload) -------------------------------------------------------------------------------- niar> Вот скрипт: niar> #!/usr/bin/perl -w niar> use strict 'refs'; niar> use CGI qw(:standard); niar> use CGI::Carp qw/fatalsToBrowser/; niar> if ($file = param('filename')) { niar> $file =~ s/.+\\([^\\]+)$|.+\/([^\/]+)$/\1/; niar> $file = '/home/public_html/public/'.$file; niar> uploadInfo($file); niar> } niar> ... niar> Hе сохраняется файл... Хотя скрипт выполняется... Что я упустил? Собственно прочесть аплоад и записать его в файл, нет? perldoc CGI на предмет слова upload. Там пример есть. -- Счастливо! Ран. --- ifmail v.2.14.os-p7-tma3 * Origin: MemoNet (2:5020/371.32@fidonet) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/1712175909ce3.html, оценка из 5, голосов 10
|