XELP, podskajite kak dastat' xml otpravlenyi xmlhttp -> PERL - Веб программирование

XELP, podskajite kak dastat' xml data otpravlenyi xmlhttp c clientskoi IE na servere perl-om

podrobnee:
u menia est' clientskaia proga napisannaya na javascript kotoraia c pomoshu xmlhttp otpravliaet xml request(vrode etogo <?xml ver...><val>12</val>) na ukazannyi URL

xmlHTTP.open("POST","http://localhost/test1.pl", false)

xochu dastat' etot grebannyi XML v hash masiv ili ne imeet znachenia vo chto
pamagite esli kto uje delal podobloe

Здравствуйте, Chugu, Вы писали:

C>XELP, podskajite kak dastat' xml data otpravlenyi xmlhttp c clientskoi IE na servere perl-om

C>podrobnee:
C>u menia est' clientskaia proga napisannaya na javascript kotoraia c pomoshu xmlhttp otpravliaet xml request(vrode etogo <?xml ver...><val>12</val>) na ukazannyi URL

C>xmlHTTP.open("POST","http://localhost/test1.pl", false)

C>xochu dastat' etot grebannyi XML v hash masiv ili ne imeet znachenia vo chto
C>pamagite esli kto uje delal podobloe

читай STDIN

 chomp($xml = <STDIN>);

... << RSDN@Home 1.1.3 beta 1 >>

spasibo za atvet andik, no nikak ne magu dastat' celyi XML
$q=<stdin>; daet tol'ko header <?xml version="1.0"?> a astal'noi xml prapadaet
i kak ia dumau etot fragment vovse ne iz zaprosa — ia zamenil version=1.0 na 2.0 i vsio ravno daet 1.0
vot sama proga
client :

<html>
.....
<SCRIPT LANGUAGE="JavaScript">
<!--
function sendrequest(){
var URL = "http://localhost/test/server.pl";
var XSL = "http://localhost/test/response.xsl"
var T0095, TYPE, sXML, xmlHTTP;
var xmlDoc = new ActiveXObject("Microsoft.XMLDOM");
var xmlHTTP = new ActiveXObject("Microsoft.XMLHTTP");
xmlDoc.async = false;
// Build an XML fragment
    sXML  = "<?xml version='1.0' ?>";
    sXML += "<Client Version='2.0'>";
    sXML += '<T0095>222</T0095>';
    sXML += '<TYPE>333</TYPE>';
    sXML += '<SUBTYPE>444</SUBTYPE>';
    sXML += '<VAL>555</VAL>';
    sXML += '<CASCADE>123</CASCADE></Client>';
alert(sXML);
xmlHTTP.open("GET",URL, false);
xmlDoc.loadXML(sXML);
xmlHTTP.setRequestHeader("Content-type", "text/xml")
xmlHTTP.send(xmlDoc);
alert(xmlHTTP.responseXML.xml);// etim alertom uznau chto vazvrashaetsia nazad

var srcTree = new ActiveXObject('Microsoft.XMLDOM');
srcTree.async=false;
srcTree.load(xmlHTTP.responseXML.xml);

var xsltTree= new ActiveXObject('Microsoft.XMLDOM');
xsltTree.async = false;
xsltTree.load(XSL);
document.write(xmlHTTP.responseXML.transformNode(xsltTree));

}
//-->
</SCRIPT>
.....
</html>

vot paluchatel' (server):

#!/usr/bin/perl
my $q=<>;
chomp($q);

###### return xml string to client ##############################
my $xml_string = "<respond1>$q</respond1>";
my $length = length($xml_string);

print <<EOD;
    Status: 200 OK
    Content-type: text/xml
    Content-length: $length;
EOD
print $xml_string;

esli est' rabochyi variant PLEASE prishlite ili abiasnite kak sdelat'
Здравствуйте, andik, Вы писали:

A>Здравствуйте, Chugu, Вы писали:

C>>XELP, podskajite kak dastat' xml data otpravlenyi xmlhttp c clientskoi IE na servere perl-om

C>>podrobnee:
C>>u menia est' clientskaia proga napisannaya na javascript kotoraia c pomoshu xmlhttp otpravliaet xml request(vrode etogo <?xml ver...><val>12</val>) na ukazannyi URL

C>>xmlHTTP.open("POST","http://localhost/test1.pl", false)

C>>xochu dastat' etot grebannyi XML v hash masiv ili ne imeet znachenia vo chto
C>>pamagite esli kto uje delal podobloe

A>читай STDIN

A>

A> chomp($xml = <STDIN>);
A>

Здравствуйте, Chugu, Вы писали:

C>spasibo za atvet andik, no nikak ne magu dastat' celyi XML
C>$q=<stdin>; daet tol'ko header <?xml version="1.0"?> a astal'noi xml prapadaet

STDIN возвращает массив, поэтому

$q = join('', <STDIN>);

Здравствуйте, anonymous, Вы писали:

A>Здравствуйте, Chugu, Вы писали:

C>>spasibo za atvet andik, no nikak ne magu dastat' celyi XML
C>>$q=<stdin>; daet tol'ko header <?xml version="1.0"?> a astal'noi xml prapadaet

A>STDIN возвращает массив, поэтому
A>

$q = join('', <STDIN>);

vsio ravno ne rabotaet
perl ashibku ne vidaet i s cmd rabotaet normal'no no browser zavisaet

Здравствуйте, Chugu, Вы писали:

вся трабла у тебя из-за символа новой строки после <?xml version='1.0'?>
появляется он у тебя после загрузки xml документа xmlDoc.loadXML(sXML);

отправляй строку и не забудь поставить в конце \r\n, иначе подвиснит все

// Build an XML fragment
    sXML  = "<?xml version='1.0' ?>";
    sXML += "<Client Version='2.0'>";
    sXML += '<T0095>222</T0095>';
    sXML += '<TYPE>333</TYPE>';
    sXML += '<SUBTYPE>444</SUBTYPE>';
    sXML += '<VAL>555</VAL>';
    sXML += '<CASCADE>123</CASCADE></Client>\r\n';
alert(sXML);
xmlHTTP.open("GET",URL, false);
xmlHTTP.setRequestHeader("Content-type", "text/xml")
xmlHTTP.send(sXML);
alert(xmlHTTP.responseXML.xml);

#!/usr/bin/perl
my $q = <>;
chomp($q);

###### return xml string to client ##############################
my $xml_string = "<respond1>$q</respond1>";

print "Content-type: text/xml\r\n\r\n";
print $xml_string;

можно так еще.

xmlDoc.async = false;
// Build an XML fragment
    sXML  = "xml=<?xml version='1.0'?>";
    sXML += "<Client Version='2.0'>";
    sXML += '<T0095>222</T0095>';
    sXML += '<TYPE>333</TYPE>';
    sXML += '<SUBTYPE>444</SUBTYPE>';
    sXML += '<VAL>555</VAL>';
    sXML += '<CASCADE>123</CASCADE></Client>';
 xmlHTTP.open("GET",URL, false);
 xmlHTTP.setRequestHeader("Content-type", "application/x-www-form-urlencoded")
 xmlHTTP.send(sXML);
 alert(xmlHTTP.responseXML.xml)

#!/usr/bin/perl
use CGI;
$param = new CGI;
###### return xml string to client ##############################
my $xml_string = "<respond1>" . $param->param('xml') . "</respond1>";
print "Content-type: text/xml\r\n\r\n";
print $xml_string;

... << RSDN@Home 1.1.3 beta 1 >>

Thanks a lot
zarabotal nakanec

Здравствуйте, andik, Вы писали:

A>Здравствуйте, Chugu, Вы писали:

A>вся трабла у тебя из-за символа новой строки после <?xml version='1.0'?>
A>появляется он у тебя после загрузки xml документа xmlDoc.loadXML(sXML);

A>отправляй строку и не забудь поставить в конце \r\n, иначе подвиснит все

A>

A>// Build an XML fragment
A>    sXML  = "<?xml version='1.0' ?>";
A>    sXML += "<Client Version='2.0'>";
A>    sXML += '<T0095>222</T0095>';
A>    sXML += '<TYPE>333</TYPE>';
A>    sXML += '<SUBTYPE>444</SUBTYPE>';
A>    sXML += '<VAL>555</VAL>';
A>    sXML += '<CASCADE>123</CASCADE></Client>\r\n';
A>alert(sXML);
A>xmlHTTP.open("GET",URL, false);
A>xmlHTTP.setRequestHeader("Content-type", "text/xml")
A>xmlHTTP.send(sXML);
A>alert(xmlHTTP.responseXML.xml);

A>

A>

A>#!/usr/bin/perl
A>my $q = <>;
A>chomp($q);

A>###### return xml string to client ##############################
A>my $xml_string = "<respond1>$q</respond1>";

A>print "Content-type: text/xml\r\n\r\n";
A>print $xml_string;

A>

A>можно так еще.
A>

A>xmlDoc.async = false;
A>// Build an XML fragment
A>    sXML  = "xml=<?xml version='1.0'?>";
A>    sXML += "<Client Version='2.0'>";
A>    sXML += '<T0095>222</T0095>';
A>    sXML += '<TYPE>333</TYPE>';
A>    sXML += '<SUBTYPE>444</SUBTYPE>';
A>    sXML += '<VAL>555</VAL>';
A>    sXML += '<CASCADE>123</CASCADE></Client>';
A> xmlHTTP.open("GET",URL, false);
A> xmlHTTP.setRequestHeader("Content-type", "application/x-www-form-urlencoded")
A> xmlHTTP.send(sXML);
A> alert(xmlHTTP.responseXML.xml)
A>

A>

A>#!/usr/bin/perl
A>use CGI;
A>$param = new CGI;
A>###### return xml string to client ##############################
A>my $xml_string = "<respond1>" . $param->param('xml') . "</respond1>";
A>print "Content-type: text/xml\r\n\r\n";
A>print $xml_string;
A>

spasiba andik vsio zarabotalo no vaznikla novaya problema
js i pl rabotaut,menyautsa XML -om normal'no

no esli ya perekachivau svoi js i pl na unix to js vidaet ashibku "permision denied" tam gde XMLHTTP.open(GET......)
to je samoe kagda perekachivau v druguu direktoriu na WINDOWS:
v smisle esli meniaetsia web server (u menia ix 3 na win2000)
vytoge rabotaet tol'ko tam gde bil usatanlovlen tot je client-server tol'ko sdelanni na .NET

v chom delo padkajite a???????

Здравствуйте, Chugu, Вы писали:

C>spasiba andik vsio zarabotalo no vaznikla novaya problema
C>js i pl rabotaut,menyautsa XML -om normal'no

C>no esli ya perekachivau svoi js i pl na unix to js vidaet ashibku "permision denied" tam gde XMLHTTP.open(GET......)
скорей всего не выставлены на перл скрипт соответствующие права, проверь чтоб было chmod 755

C>to je samoe kagda perekachivau v druguu direktoriu na WINDOWS:
C>v smisle esli meniaetsia web server (u menia ix 3 na win2000)
все IIS
perl скрипты похоже работают через perl.exe
в свойствах виртуального каталога, где лежат скрипты, проверяешь чтоб Execute Permission был Scripts and Executables

C>vytoge rabotaet tol'ko tam gde bil usatanlovlen tot je client-server tol'ko sdelanni na .NET

C>v chom delo padkajite a???????

... << RSDN@Home 1.1.3 beta 1 >>

Здравствуйте, andik, Вы писали:

A>Здравствуйте, Chugu, Вы писали:

C>>spasiba andik vsio zarabotalo no vaznikla novaya problema
C>>js i pl rabotaut,menyautsa XML -om normal'no

C>>no esli ya perekachivau svoi js i pl na unix to js vidaet ashibku "permision denied" tam gde XMLHTTP.open(GET......)
A>скорей всего не выставлены на перл скрипт соответствующие права, проверь чтоб было

chmod 755
nu v unixe ya ne navichok

(skaree v windowse chem v inixe)

C>>to je samoe kagda perekachivau v druguu direktoriu na WINDOWS:
C>>v smisle esli meniaetsia web server (u menia ix 3 na win2000)
A>все IIS
A>perl скрипты похоже работают через perl.exe
A>в свойствах виртуального каталога, где лежат скрипты, проверяешь чтоб Execute Permission был Scripts and Executables

imenno tak i est ni xrena ni paimu

i perl prapisan i exec

C>>vytoge rabotaet tol'ko tam gde bil usatanlovlen tot je client-server tol'ko sdelanni na .NET

C>>v chom delo padkajite a???????

Здравствуйте, Chugu, Вы писали:

C>chmod 755
C>nu v unixe ya ne navichok

(skaree v windowse chem v inixe)
apache сконфигурирован на выполнение cgi?

A>>perl скрипты похоже работают через perl.exe
A>>в свойствах виртуального каталога, где лежат скрипты, проверяешь чтоб Execute Permission был Scripts and Executables

C>imenno tak i est ni xrena ni paimu

C>i perl prapisan i exec

именно на тот каталог, где лежат скрипты права соответствующие стоят?

... << RSDN@Home 1.1.3 beta 1 >>

karoche

situacia takaya:

u menia na rabote (ya IT manager) nanyali kakovata idiota katorii sdelal sistemu client->xml<-server na .NET (nenaviju Microsoft)

, a patom kagda emu zaplatili akazalos chto ne vsio tam tak kak nujno

posle paruchili mne ispravit' i dabavit' chtoto v etu sistemu, vot, ya sel i razabral vse eti VB (griobannie) scripti i vrode ponyal chto kchemu i nachal ispravliat' ashibku no ne xrena — akazalos chto eto project .NET-a i tam skompilirovan kakoi to dll katoromu po vig eti VB scripti

posle etovo ti uje znaesh chto ya pitaus perenesti vsio na perl, pomoimu vsio paluchilos, s tvoei pomoschu kanechno, no adno no vsio rabotaet tol'ko vtoi direktorii v katoroi lijit starii PROJECT .NET

ya dumau eto ne iz za JS or PL pomoemu eto chtoto s XML-om ili DTD ili XSL

nu vot esli est' vremya pashlu ves anturaj' :

karoche

situacia takaya:

u menia na rabote (ya IT manager) nanyali kakovata idiota katorii sdelal sistemu client->xml<-server na .NET (nenaviju Microsoft)

, a patom kagda emu zaplatili akazalos chto ne vsio tam tak kak nujno

posle paruchili mne ispravit' i dabavit' chtoto v etu sistemu, vot, ya sel i razabral vse eti VB (griobannie) scripti i vrode ponyal chto kchemu i nachal ispravliat' ashibku no ne xrena — akazalos chto eto project .NET-a i tam skompilirovan kakoi to dll katoromu po vig eti VB scripti

posle etovo ti uje znaesh chto ya pitaus perenesti vsio na perl, pomoimu vsio paluchilos, s tvoei pomoschu kanechno, no adno no vsio rabotaet tol'ko vtoi direktorii v katoroi lijit starii PROJECT .NET

ya dumau eto ne iz za JS or PL pomoemu eto chtoto s XML-om ili DTD ili XSL

nu vot esli est' vremya pashlu ves anturaj' :

Здравствуйте, Chugu, Вы писали:

C>karoche

C>situacia takaya:

C>u menia na rabote (ya IT manager) nanyali kakovata idiota katorii sdelal sistemu client->xml<-server na .NET (nenaviju Microsoft)

, a patom kagda emu zaplatili akazalos chto ne vsio tam tak kak nujno

posle paruchili mne ispravit' i dabavit' chtoto v etu sistemu, vot, ya sel i razabral vse eti VB (griobannie) scripti i vrode ponyal chto kchemu i nachal ispravliat' ashibku no ne xrena — akazalos chto eto project .NET-a i tam skompilirovan kakoi to dll katoromu po vig eti VB scripti

как у вас все запущено

C>posle etovo ti uje znaesh chto ya pitaus perenesti vsio na perl, pomoimu vsio paluchilos, s tvoei pomoschu kanechno, no adno no vsio rabotaet tol'ko vtoi direktorii v katoroi lijit starii PROJECT .NET

C>ya dumau eto ne iz za JS or PL pomoemu eto chtoto s XML-om ili DTD ili XSL

Вопрос, у тебя вообще то случаем не JavaScript выдает ошибку "Permission denied"?

Может быть ситуация такая, что когда переносишь скрипты на другой сайт,
ты в своем js в строке

var URL = "http://host/test/server.pl";
var XSL = "http://host/test/response.xsl"

все оставляешь как есть

в итоге URL = "http://host/" не совпадает с тем, что в браузере. У тебя выскакивает окно с предупреждением.
На "No" получаем JavaScript ошибку "Permission denied". Это оно?

Больше идей нет.

Опиши конкретней, где ты получаешь сообщение.

... << RSDN@Home 1.1.3 beta 1 >>

Здравствуйте, andik, Вы писали:

A>Здравствуйте, Chugu, Вы писали:

C>>karoche

C>>situacia takaya:

C>>u menia na rabote (ya IT manager) nanyali kakovata idiota katorii sdelal sistemu client->xml<-server na .NET (nenaviju Microsoft)

, a patom kagda emu zaplatili akazalos chto ne vsio tam tak kak nujno

posle paruchili mne ispravit' i dabavit' chtoto v etu sistemu, vot, ya sel i razabral vse eti VB (griobannie) scripti i vrode ponyal chto kchemu i nachal ispravliat' ashibku no ne xrena — akazalos chto eto project .NET-a i tam skompilirovan kakoi to dll katoromu po vig eti VB scripti

A>как у вас все запущено

<- bidaal! vot tak ya za svaim shefom ganiaus

C>>posle etovo ti uje znaesh chto ya pitaus perenesti vsio na perl, pomoimu vsio paluchilos, s tvoei pomoschu kanechno, no adno no vsio rabotaet tol'ko vtoi direktorii v katoroi lijit starii PROJECT .NET

C>>ya dumau eto ne iz za JS or PL pomoemu eto chtoto s XML-om ili DTD ili XSL

A>Вопрос, у тебя вообще то случаем не JavaScript выдает ошибку "Permission denied"?

da kanechno java a ti dumal webserver ?
nea java i pritom chto tvai saveti toje uchteni naschot http://host

A>Может быть ситуация такая, что когда переносишь скрипты на другой сайт,
A>ты в своем js в строке
A>

A>var URL = "http://host/test/server.pl";
A>var XSL = "http://host/test/response.xsl"
A>

A>все оставляешь как есть

A>в итоге URL = "http://host/" не совпадает с тем, что в браузере. У тебя выскакивает окно с предупреждением.
A>На "No" получаем JavaScript ошибку "Permission denied". Это оно?

A>Больше идей нет.

A>Опиши конкретней, где ты получаешь сообщение.

js ruxnit imenno na toi strake gde xmlhttp.open

Здравствуйте, Chugu, Вы писали:

A>>Вопрос, у тебя вообще то случаем не JavaScript выдает ошибку "Permission denied"?

C>da kanechno java a ti dumal webserver ?
C>nea java i pritom chto tvai saveti toje uchteni naschot http://host

A>>Может быть ситуация такая, что когда переносишь скрипты на другой сайт,
A>>ты в своем js в строке
A>>

A>>var URL = "http://host/test/server.pl";
A>>var XSL = "http://host/test/response.xsl"
A>>

A>>все оставляешь как есть

A>>в итоге URL = "http://host/" не совпадает с тем, что в браузере. У тебя выскакивает окно с предупреждением.
A>>На "No" получаем JavaScript ошибку "Permission denied". Это оно?

A>>Больше идей нет.

A>>Опиши конкретней, где ты получаешь сообщение.

C>js ruxnit imenno na toi strake gde xmlhttp.open

У меня там тоже падает при несовпадении хостов, если проигнорировать сообщение о секурити от эксплорера.
Все настройки ИЕ по дефолту.

если можно, то дай сылку посмотреть.

... << RSDN@Home 1.1.3 beta 1 >>

to je samoe s IE security — ne prablema
vot url katorii zaprashivaetsia s xmlhttp: http://www.ean.cz/gepir/server.php

na pervuu papytku JS vidaet: unknown name
a na vtoroi : permision denied

karoche padkin' e-mail vsio pashlu

Здравствуйте, Chugu, Вы писали:

C>to je samoe s IE security — ne prablema
C>vot url katorii zaprashivaetsia s xmlhttp: http://www.ean.cz/gepir/server.php

C>na pervuu papytku JS vidaet: unknown name
C>a na vtoroi : permision denied
подставил себе этот все ок.

C>karoche padkin' e-mail vsio pashlu

высылай u_andreya[at]pisem dot net. Будет минутка гляну.

... << RSDN@Home 1.1.3 beta 1 >>

	От:	Chugu
	Дата:	26.02.04 14:20
	Оценка:

	От:	andik
	Дата:	26.02.04 15:03
	Оценка:

	От:	Chugu
	Дата:	28.02.04 15:03
	Оценка:

От:	anonymous	http://denis.ibaev.name/
Дата:	28.02.04 15:21
Оценка:

	От:	Chugu
	Дата:	01.03.04 07:04
	Оценка: