Perl Monk, Perl Meditation | |
PerlMonks |
Can't Get CGI Results Page to Redirectby socrtwo (Sexton) |
on Aug 03, 2009 at 20:11 UTC ( [id://785543]=perlquestion: print w/replies, xml ) | Need Help?? |
socrtwo has asked for the wisdom of the Perl Monks concerning the following question: Hi. Sorry for the confusing English..., My father is a stamp dealer for French or Chinese stamps. I am trying to create a stamp ID Web service using ImgSeek, where a user can upload an image of a French or Chinese stamp and then get back 10 or so images from a collection of 3,250 scanned images that are most similar in color and image shape. The image names are attached to the images and since the image names contain the Scott Catalog Number, the stamp can be possibly identified. I realize there are copyright issues with the Scott Catalog's publisher, an issue which I would rather not discuss here. I'm using this only as test case. I'm wishing to create a broader uploaded image ID system for release as open source after later switching to an open source uploader and adding a GIF, JPEG and PNG to BMP converter module. I have presently modified a commercial freeware CGI uploader script from perlservices. I have added code from a Japanese site here, that catalogs each uploaded BMP image using the Perl Module wrapper of ImgSeek, Image::Seek. The cataloging works pretty well seemingly easily detecting if I have already uploaded a BMP image, and not adding it to the imgname and imgseek databases specified in the code named "makedb.pl" on the Japanese site. On that site there is also a CGI script called "seek.cgi" which will return the images most similar to the one whose database number key is added either to the form with it's naked URL or added to the returned results CGI page, where the form exists again for further entry. Since the 'makedb.pl' code returns the newly uploaded image's newly created imgname.db and imgseek.db number keys, with regular expressions, I'm able to isolate the new key and construct the URL of the seek.cgi query which I would like to make, which is that of the newly uploaded image. For instance: http://www.godskingsandheroes.info/stamps/seek.cgi?id=2352.
So, here's the rub, I can get my uploader CGI results to print my constructed URL for the uploaded image, but I can't the browser to redirect to the new page. I have tried to put this code from the Perl Cookbook in the header section of the upload script:
I have Jail Shell access, and was able to check that the makedb.pl was not running through successfully when the header was executing, suggesting that the file had not uploaded yet when the header was writing...I guess. This was true, even if I made my makedb.pl script sleep. So here is that code:
I also tried putting this first method from the Cookbook, after everything but the footer printed. Then I tried redirecting from inside the footer too. None of these methods would execute a redirection.
So I tried the second Perl Cookbook method:
I tried this code too, in the header, in the middle of the script and in the footer...no redirection. In the footer I tried putting the statement before printing </body>, and I also tried putting it after printing just </body>
From my cPanel X account, I also tried installing and then using CGI::Application::Plugin::Redirect;, with this code
Nothing happens from the header, my results page is returned per normal (from my last project). cPanel makes you put in the 'include' code that's at the beginning if that is confusing you. It allows the module work. I tested the module with Jail Shell to make sure it was not producing an error and it did not return an error. I tried several permutations not mentioned here, also without success. Why is it so difficult to get a redirection?
Back to
Seekers of Perl Wisdom
|
|