SERVER global variables in Perl?

[davidwalker611]

Hi

PHP supplies variables such as $_SERVER['PHP_AUTH_USER'] for discovering the user name of an authenicated user (for example someone who has logged onto a web page using htdigest). Is there any similar set of variables accessible from within Perl that would allow me to find out details of an authenticated user (i.e., if they log into a page from which they POST a form that runs a Perl script can I find out the user name within the perl script?).

Thanks
David

[numberwhun]

Hi

PHP supplies variables such as $_SERVER['PHP_AUTH_USER'] for discovering the user name of an authenicated user (for example someone who has logged onto a web page using htdigest). Is there any similar set of variables accessible from within Perl that would allow me to find out details of an authenticated user (i.e., if they log into a page from which they POST a form that runs a Perl script can I find out the user name within the perl script?).

Thanks
David

I don't know about your "i.e." question, but as for if there are environment variables, of course there are:

   #!/usr/bin/perl
 
   print "Content-type: text/html\n\n";
   print "<tt>\n";
   foreach $key (sort keys(%ENV)) {
      print "$key = $ENV{$key}<p>";
   } 
 

Regards,

Jeff

[KevinADC]

if they log into a page from which they POST a form that runs a Perl script can I find out the user name within the perl script?).

Probably not. I believe PHP automatically keeps track of sessions (correct me if I am wrong) while perl does not. With perl you have to use a module that tracks the session (CGI::Sessions or other module) or code it into the program yourself.

As Jeff has posted, perl does have the %ENV that stores some environment variables, but I don't think you will find it useful for your particular question. But give it a try.

[davidwalker611]

Thanks to Jeff and Kevin for your replies. I listed the Perl ENV variables, and they didn't include the information I needed, so I'll look at using Session.

David