Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

cgi https and perl

by datannen (Novice)
on Sep 05, 2003 at 08:49 UTC ( #289138=perlquestion: print w/ replies, xml ) Need Help??
datannen has asked for the wisdom of the Perl Monks concerning the following question:

Hi, I'm trying to access my perl script to check a PHP session via https and get a Forbidden error. Do I need to change something in my code to allow the script to be accessed via https://site/cgi-bin/script.pl??
#!/usr/bin/perl use CGI qw(:standard); use CGI::Cookie; use PHP::Session; %cookies = fetch CGI::Cookie; print (header()); print (start_html({title => "Admin Cookie CGI"})); print "Actual Cookies present:\n"; foreach $key (sort keys %cookies) { print "Cookie: $key Value: $cookies{$key}\n"; } print "Getting PHP Session variables..."; my $session = PHP::Session->new($cookies{PHPSESSID}->value); $id = $session->id; if ($session->is_registered('Is_An_Admin')) { $userid = $session->get('UserID'); } else { $userid = "Not a valid admin"; } print <<ENDH; <br><br> Admin UserID: $userid <h1>End Cookie test</h1> ENDH print (end_html());

Comment on cgi https and perl
Download Code
Re: cgi https and perl
by datannen (Novice) on Sep 05, 2003 at 09:16 UTC
    sorry about this question...was an apache server config issue. I was just tired...time to go to sleep.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://289138]
Approved by Corion
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (10)
As of 2015-05-07 06:51 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    In my home, the TV remote control is ...









    Results (157 votes), past polls