mirror of
https://github.com/webmin/webmin.git
synced 2025-07-23 00:30:33 +00:00
19 lines
346 B
Perl
Executable File
19 lines
346 B
Perl
Executable File
#!/usr/local/bin/perl
|
|
# logout.cgi
|
|
# Cancel the username and password cookie for a server
|
|
|
|
use strict;
|
|
use warnings;
|
|
no warnings 'redefine';
|
|
no warnings 'uninitialized';
|
|
require './servers-lib.pl';
|
|
&ReadParse();
|
|
our (%in);
|
|
print "Set-Cookie: $in{'id'}=; path=/";
|
|
if (uc($ENV{'HTTPS'}) eq 'ON') {
|
|
print "; secure";
|
|
}
|
|
print "\n";
|
|
&redirect("");
|
|
|