my $url = $cgi->param('url'); my $cookie = $cgi->cookie( -name => 'affiliate_id', -value => $aid, -path => '/', -domain => $ENV{'HTTP_HOST'}, -secure => 0, -expires => '+3d' ); $self->header_add(-cookie => $cookie); $self->header_add(-redirect => $cgi->redirect($url)); #### $self->header_add(-cookie => [$cookie]); #### print $cgi->header( -cookie => $cookie, -redirect => $cgi->redirect($url) ); #### $self->header_type('redirect'); $self->header_props( -url => $url, -cookie => [$cookie] );
## $self->header_add(-cookie => [$cookie]); ##
## print $cgi->header( -cookie => $cookie, -redirect => $cgi->redirect($url) ); ##
## $self->header_type('redirect'); $self->header_props( -url => $url, -cookie => [$cookie] );