URL: https://www.opennet.me/cgi-bin/openforum/vsluhboard.cgi
Форум: vsluhforumID8
Нить номер: 6485
[ Назад ]

Исходное сообщение
"простенький скрипт не работает в опере и лисе, только в ie."

Отправлено visitor , 27-Авг-09 10:00 
здравствуйте.
скрипт по аплоуду файла на сервер работает только ie. В лисе и опере не хочет.
вот сам скрипт:
cat testup1.cgi
#!/usr/bin/perl

use CGI;
my $cgi = new CGI;
my $file = $cgi->param('file');

open (IN2, ">>/tmp/sitename");
print IN2 "1 - $file\n";

$file=~m/^.*(\\|\/)(.*)/; # strip the remote path and keep the filename
print IN2 "2 - $file\n";

my $name = $2;
print IN2 "3 - $name\n";

open(IN, ">/tmp/$name");
while(<$file>) {
    print IN $_;
}

#print FILE while (<$file>);

print $cgi->header();
print "$file has been successfully uploaded... thank you.\n";

вот форма:
cat testcgiw.html
<FORM ENCTYPE="multipart/form-data" ACTION="/cgi-bin/testup1.cgi" METHOD="POST">
         <p>
         Please select a file to upload: <BR>
        <INPUT TYPE="FILE" NAME="file">
        <p>
<INPUT TYPE="submit">
</FORM>

вывод при запуске в лисе и опере:
cat sitename
1 - 085.jpg
2 - 085.jpg
3 -

вывод при отправке из ie:
1 - I:\save\pics\1\085.jpg
2 - I:\save\pics\1\085.jpg
3 - 085.jpg

здесь видно что он и не будет работать в опере и лисе. Но почему так происходит :)
помогите разобраться.
заранее спасибо.


Содержание

Сообщения в этом обсуждении
"простенький скрипт не работает в опере и лисе, только в ie."
Отправлено angra , 28-Авг-09 09:29 
Потому что скрипт писал дурак, помимо этой проблемы там есть еще дырка в безопасности, не надо этот скрипт использовать, найдите вменяемый вариант.

"простенький скрипт не работает в опере и лисе, только в ie."
Отправлено visitor , 29-Авг-09 11:17 
>Потому что скрипт писал дурак, помимо этой проблемы там есть еще дырка
>в безопасности, не надо этот скрипт использовать, найдите вменяемый вариант.

вы на 100% правы. вот здесь рабочий во всех браузерах и похоже вполне вменяемый вариант.
http://www.sitepoint.com/article/uploading-files-cgi-perl/
может кому пригодиться.


"простенький скрипт не работает в опере и лисе, только в ie."
Отправлено angra , 30-Авг-09 05:31 
>http://www.sitepoint.com/article/uploading-files-cgi-perl/

Действительно очень хороший пример.