CGI: Cookie-Problem (Fragen zu Perl-Modulen)

[thread]19434[/thread]

CGI: Cookie-Problem

Tags: perl5 Ähnliche Threads

Leser: 9

Articles: hide open all | hide show old branches

+3 replies

Nexo

2014-12-24 15:12

User since
2012-07-07
10 Artikel
BenutzerIn
[default_avatar]

Hallo zusammen,

irgendwie schreibt diese Routine keine gültigen Cookies:

Code: (dl )

my $cgi = CGI->new();
my $cookie1 = $cgi->cookie(-name=>		'autoname',
                          -value=>		$meinWert1,
                          -expires =>	'+1y',								  
                          );

my $cookie2 = $cgi->cookie(-name=>		'autopin',
                          -value=>		$meinWert2,
                          -expires =>	'+1y',								  
                          );
print $cgi->header(-cookie => [$cookie1, $cookie2]);

Sie werden zwar auf dem Entwicklungscomputer vom Skript richtig geschrieben und später auch wieder gelesen, aber im Cookie-Verzeichnis in Windows sind sie nicht zu finden. Das habe ich unter Windows 8 und unter Windows 8.1 getestet. Die Folge ist, dass das Schreiben und Lesen der Cookies mit diesem Skript auf anderen Geräten wie Smartphones nicht funktioniert. Könnte es sein, dass dieses doch schon recht alte Modul den Cookie-Pfad auf neueren Geräten und Betriebssystemversionen nicht richtig erkennt? Wenn ja: Was tun?

Danke, Nexo

GwenDragon

2014-12-24 15:28

User since
2005-01-17
14748 Artikel
Admin1

Was für ein Coookie-Pfad?
Domain und URL auf der Cookies gültig bleiben, musst du setzen.

Code (perl): (dl )

#!/usr/bin/perl

use strict; 
use warnings;

my $meinWert1 = '04711';
my $meinWert2 = '42 THE VALUE OF THE WEB!';

use CGI;
my $cgi = CGI->new();
my $cookie1 = $cgi->cookie(-name=>              'autoname',
                          -value=>              $meinWert1,
                          -expires =>   '+1y',                                                            
                          );

my $cookie2 = $cgi->cookie(-name=>              'autopin',
                          -value=>              $meinWert2,
                          -expires =>   '+1y',                                                            
                          );
print $cgi->header(-cookie => [$cookie1, $cookie2]);

Code: (dl )

Set-Cookie: autoname=04711; path=/; expires=Thu, 24-Dec-2015 14:27:25 GMT
Set-Cookie: autopin=42%20THE%20VALUE%20OF%20THE%20WEB%21; path=/; expires=Thu, 24-Dec-2015 14:27:25 GMT
Date: Wed, 24 Dec 2014 14:27:25 GMT
Content-Type: text/html; charset=ISO-8859-1

Wieso ist das Modul alt? CGI::Cookie ist vom Dez. 2014 und CGI auch.
Last edited: 2014-12-24 15:30:14 +0100 (CET)

die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

GwenDragon

2014-12-24 16:58

User since
2005-01-17
14748 Artikel
Admin1

Verschoben von Allgemeines zu Perl nach Fragen zu Perl-Modulen
die Drachin Gwen

Meine Perl-Artikel · perldev – verschiedene Perl-Versionen unter Windows starten

View all threads created 2014-12-24 15:12.