#!/usr/bin/perl
# Simple script to generate a 302 HTTP redirect

print "Status: 302 Moved Temporarily\r\n";
print "Location: success200.html\r\n";
print "Content-type: text/html\r\n";
print "\r\n";

print <<HERE_DOC_END
<html><body>
This page should not be seen - it is a 302 redirect to another page.
The key aspect is that this page should not wind up in the back/forward
list, since there should only be one entry for the navigation through
this page to the eventual target.
</body></html>
HERE_DOC_END