Leser: 4
![]() |
![]() |
7 Einträge, 1 Seite |
Net::LDAP) vielleicht ist da was passendes dabei...
1
2
3
4
5
6
7
#!/usr/bin/perl
use CGI qw/:standard/;
use Data::Dumper;
print header, start_html;
my $user=$ENV{REMOTE_USER}; #Thats what Im looking for.
print "Logegd in as: $user<br>";
print end_html;
![]() |
![]() |
7 Einträge, 1 Seite |