I've used the super seaches to find out how possible causes and so far I've learned I need to use a module or two allow https to allow the execution. Node 348806 Seems somewhat helpfull, and I've tried implementing parts of the code to mine, yet no luck. So I still don't get it.
Searching my server for SSL or HTTPS installed modules, I've found only these:
LWP::Protocol::https
LWP::Protocol::https10
URI::https
Net::HTTPS
Crypt::SSLeay «sounds usefull
Net::SSLeay::Handle «sounds usefull
Net::SSLeay «sounds usefull
Net::SSL
Can someone please show me some examples? Or if you think it's worth installing a new module on the server, I can try and request it from the providers...
I'm accessing the file directly and also through SHTML
Here's the top portion of my code if it helps:
Also most of the documentation on CPAN is over my head and they seem to have changed some of their setup... Thank you for your help in advance. JB#!/usr/bin/perl use CGI ':standard'; use CGI::Carp "fatalsToBrowser"; use LWP::UserAgent; use LWP::Protocol::https; my $ua = LWP::UserAgent->new; my $request = POST 'https://myurl.com/cgi-bin/shop.cgi', [ UserID => $uid, Password => $upass, ]; if (!param()) { gofresh(); } elsif (param('start') =~ /mid/) { gofresh(2); } elsif (param('start') =~ /img/) { viewimg(); } elsif (param('start') =~ /checkout/) { checkout(); } elsif (param('start') =~ /addcart/) { $itnum=param('itnum'); &addtocart($itnum); print redirect( "../shop/#$itnum" ); } elsif (param('start') =~ /remove/) { $itnum=param('itnum'); &remove(param('itnum')); print redirect( "../shop/#$itnum" ); } elsif (param('start') =~ /shopdone/) { &addtocart(param('itnum')); paybill(); } elsif (param('start') =~ /paybill/) { paybill(); } else { print redirect( "../shop/" ); exit; }
In reply to https://script not found on port 443 by JayBee
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |