stevee has asked for the wisdom of the Perl Monks concerning the following question:

Greetings learned monks,

I am using Through the wisdom of fellow monks I sorted out an issue I had yesterday about getting a re-direct to work. The first item you "print" should be the redirect to make it work. However, due to a requirement change, I need to set a cookie before I action the redirect.

The following code fragment does not work, i.e. a cookie is set but no redirect takes place because there has been a "print" before the "redirect".

use strict; use warnings; use CGI; my $q = CGI->new; my $cookie = $q->cookie(-name=>'lizzy', -value=>'Lizzy', -expires=>'+12h'); #my $r=CGI->new; print $q->redirect( -uri => '' ); print $q->header(-cookie=>$cookie);

Does anyone have any ideas how I can set the cookie and get the redirect to work?

Many thanks