Hallo!
Ich habe da eine Sub der ich eine URL zum redirecten gebe.
sub _redir {
my $self = shift;
my $q = $self->query();
my $new_url = shift || $q->url(-relative=>1);
$self->header_type('redirect');
$self->header_props(-url=>$new_url);
#print STDERR Data::Dumper::Dumper($new_url);
return "Redirecting to $new_url";
} # redir
$self->header_type('redirect'); und
$self->header_props(-url=>$new_url); sind Methoden der Klasse CGI::Application, welche einfach dazu dienen später einen redirect (http) - header und die dazugehörige URL auszugeben.
Jetzt bekomme ich bei Programm B (bei A geht es komischerweise) das Zeichen %0A in den Querystring gehauen:
http://127.0.0.1/cgi-bin/plaettig/feedback.cgi%0A?rm=showErrorForm;Name=;eMail=a;Firma=;Nachricht=%0D%0A
Und das bei diesem Aufruf:
# $q = Query-Objekt
$self->_redir($q->url(-relative=>1,-path_info=>1,-query=>1));
Wenn ich das -path_info=>1 weg lasse, also nur die URL übergebe passiert das Selbe.
Woran könnte das liegen?
mfg pktm\n\n
<!--EDIT|renee|1093605265-->