Readers: 3
|< 1 ... 3 4 5 6 7 >| | 65 entries, 7 pages |
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
#!/usr/bin/perl
$| = 1;
use strict;
use warnings;
use CGI;
use CGI::Cookie;
my $cgi = new CGI;
my $c = new CGI::Cookie;
use Data::Dumper;
my $val = 'Ruth WzAZMuffOotJuZ1Ra12xZWl4dw /';
$c = new CGI::Cookie(-name => 'login',
-value => $val,
-expires => '+1d',
-domain => 'test'
);
print $cgi->header( -cookie=>$c);
print $cgi->start_html,
$cgi->h1('Cookietest'),
$cgi->p('with ' . $ENV{HTTP_USER_AGENT}),
$cgi->p('Cookie read back with JavaScript'),
$cgi->p(
$cgi->script( {-type=>'text/javascript'},'document.write(document.cookie);'),
$cgi->noscript( $cgi->h1({ -style=>'color:darkred' },'Please activate Javascript to run the test!')),
),
$cgi->p($cgi->b('In Reality Cookie is [DEBUGCODE]: ', $cgi->br, Dumper($c) ) ),
$cgi->end_html;
1;
GwenDragon+2008-06-10 18:04:15--Die jetztige Version 9.5 RC hat den Cookiebug des 31. gefixt.
http://my.opera.com/desktopteam/blog/2008/06/10/op...
|< 1 ... 3 4 5 6 7 >| | 65 entries, 7 pages |