Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.
Redirect
Hello,
I have the following script part:
elsif ($r_in->{'action'} eq "write_cart_to_window") {
require "$datalib/view_cart.pl";
print "\n";
if ($cart_id && -e "$cart_dir/$cart_id.cart")
view_cart(\%in,$cart_id,$r
}
else {
Location: http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html;
}
}
What I want to do is to redirect to the url http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html when if ($cart_id && -e "$cart_dir/$cart_id.cart")
The script contains also the line
print "Content-type: text/html\n";
which can not be removed,replaced or changed because the script will then stop workings!!
How to do that??
I have the following script part:
elsif ($r_in->{'action'} eq "write_cart_to_window") {
require "$datalib/view_cart.pl";
print "\n";
if ($cart_id && -e "$cart_dir/$cart_id.cart")
view_cart(\%in,$cart_id,$r
}
else {
Location: http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html;
}
}
What I want to do is to redirect to the url http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html when if ($cart_id && -e "$cart_dir/$cart_id.cart")
The script contains also the line
print "Content-type: text/html\n";
which can not be removed,replaced or changed because the script will then stop workings!!
How to do that??
Asked:
-
3
- +3
1 Solution
the 'refesh' meta can work better on som e occasions, like give you a chance to show a page to inform the user they are being redirected and to provide a link to the new location in case the users' browser doesnot take the redirection too well.
If you want to send "Location: http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html\n\n"
you should not send "Content-type: text/html\n\n"
you should not send "Content-type: text/html\n\n"
from what you are saying there is a common print "Content-type..." statement for both the if and the else part.
what you need to do is put that statement ONLY in the if part (or just before you do a print anywhere else)
when the else part is encountered, the one and only print statement that must be encountered must be the print "Location..." statement.
Alternate if you dont want to or cant remove the print "Content-type:.." statement, replace the print "Location ..." with
print qq{<meta http-equiv="refresh" content="0;
URL=": http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html">
};
Hope that helps..
But, giving
print "Content-type: text/html\n";
before "Location ..." does work, if there is only one "\n" at its end. I know cos I have tried it.
#!/usr/bin/perl
print "Content-type: text/html\n";
print "Location: http://www.yahoo.com\n";
Maybe it's not needed, but it works.
print "Content-type: text/html\n";
before "Location ..." does work, if there is only one "\n" at its end. I know cos I have tried it.
#!/usr/bin/perl
print "Content-type: text/html\n";
print "Location: http://www.yahoo.com\n";
Maybe it's not needed, but it works.
# use the CGI class
use CGI;
#then you can use the following
print $query->redirect("http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html; ")
use CGI;
#then you can use the following
print $query->redirect("http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html; ")
You can't print anything before Location,and the program should be:
else
{
print "Location: http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html\n";
print "Content-type: text/html\n";
}
Maybe can helps...
else
{
print "Location: http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html\n";
print "Content-type: text/html\n";
}
Maybe can helps...
Question has a verified solution.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Join & Write a Comment Already a member? Login.
Featured Post
Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Tackle projects and never again get stuck behind a technical roadblock.
Join Now
{
print "Content-type: text/html\n";
print "Location: http://mmcw.hypermart.net/cgi-bin/DCShop/menu.html\n";
}