Hi,

we're using the following code:

sub savelink ($modul: string min 4 max 4, $page: string default index.html) {
  my $r = Apache->request;
  my $session_id = $r->pnotes('sessionid');

  my $uri = Apache::URI->parse($r);
  my $hostinfo = $uri->hostinfo;
  my $scheme =  $uri->scheme;

  my $url = $scheme . '://' .
            $hostinfo . '/'.
            $session_id . '/' .
            $GAD::SessionMgr::DIR_PREFIX . '/' .
            $modul . '/' .
            $page;

  return $url;
}

You may want to use
  (undef, $rest) = split '/', $r->uri, 2;
  $rest .= '?' . $r->args if $r->args;
instead of $modul and $page.

Michael


Datum:         06.11.2001 16:43
An:            [EMAIL PROTECTED]


Betreff:       http or https in URL?
Nachrichtentext:

In a mod_perl handler I want to construct the original URL of the request.
I
can construct it with r->get_server_name, r->get_server_port, r->uri and
$r->parsed_uri->query.

But how do I get the protocol, http or https.  Is there a way to find out
whether SSLEngine On is set?

Yes, I can set it with "PerlSetVar protocol https", but is there a simpler
way?

Thanks in advance,
Peter
--
/"\ ASCII Ribbon Campaign
\ /
 X Against HTML
/ \ in e-mail & news





Reply via email to