Opened by a_abels at 2011-10-10 15:16
User since
2005-01-17
14533 Artikel
Admin1
![[Homepage]](/battie/theme/default/homepage.gif)
2005-01-17
14533 Artikel
Admin1
Ich bekomme mit:
Die Ausgabe:
So wie ich das sehe, klappt es bei mir mit dem Login.
Ich nehme an, das der Server einfach ein paar falsche HTTP-Header ausgibt und der kaputte Internet Explorer das ignorioert.
Während LWP sich an Regeln hält.
Last edited: 2011-10-25 14:13:11 +0200 (CEST)
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
use strict; use warnings; use LWP::UserAgent; my $pw='abcdefg'; my $us='1234567'; my $url = "https://poms-test.ts.fujitsu.com/CallLog"; my $response; my $ua = LWP::UserAgent->new; $ua->requests_redirectable(undef); # Redirects ausschalten! $ua->credentials("poms-test.ts.fujitsu.com:443", "POMS2", $us, $pw); my $response = $ua->post($url,[0=>0]); print $response->status_line; print $response->decoded_content;
Die Ausgabe:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
200 OK
<html>
<head>
<title>Siemens PERLE-POMS2 HTTP Answer</title>
<style type="text/css">
<!--
body { background-color:black; margin:0;}
.Ueberschrift1 { text-align:left; color:aqua; font-size:13pt; font-weight:bold; font-family:Arial;}
.Ueberschrift2 { text-align:left; color:aqua; font-size:13pt; font-weight:bold; font-family:Arial;}
.Text1 { text-align:center; color:red; font-size:14pt; font-weight:bold; font-family:Arial;}
.Text2 { text-align:left; color:lime; font-size:12pt; font-weight:bold; font-family:Arial;}
-->
</style>
</head>
<body marginheight="0" marginwidth="0" topmargin="0" leftmargin="0">
<!-- Tabelle ueber den gesamten Bildschirm zur mittigen Ausrichtung -->
<table width="100%" height="100%" cellpadding="0" cellspacing="0" border="0">
<tr>
<td height="100%" valign="middle">
<table width="500" align="center">
<tr class="Text1">
<td colspan=2>This message is created by the POMS system. So you can sure that you are able to reach the POMS system</td>
</tr>
<tr class="Ueberschrift1">
<td colspan=2>
POMS2 HTTP Code :<br>
</td>
</tr>
<tr class="Text1">
<td colspan=2>
HTML - 200 OK
</td>
</tr>
<tr>
<td> </td>
</tr>
<tr class="Ueberschrift2">
<td colspan=2>
POMS2 Info:
</td>
</tr>
<tr class="Text2">
<td> </td>
<td>
Your call has been passed to POMS2 system
</td>
</tr>
</table>
<!-- Ende der Tabelle ueber den gesamten Bildschirm zur mittigen Ausrichtung -->
</td>
</tr>
</table>
</body>
</html>
So wie ich das sehe, klappt es bei mir mit dem Login.
Ich nehme an, das der Server einfach ein paar falsche HTTP-Header ausgibt und der kaputte Internet Explorer das ignorioert.
Während LWP sich an Regeln hält.
Last edited: 2011-10-25 14:13:11 +0200 (CEST)
die Drachin, Gwendolyn
Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel
Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel