14 lines
365 B
Perl
Executable File
14 lines
365 B
Perl
Executable File
#!/usr/bin/perl
|
|
# STTA Rev. 1.3 Copyright (c) 2001-2004 Jesús Pérez Lorenzo --- license GNU GPL
|
|
# stta: (@#) 1.31051043346- [2004_01_29_102036]
|
|
# log_https.cgi
|
|
# HTTPS LOG Monitor to Services with Tarantella
|
|
|
|
require './stta-lib.pl';
|
|
if ( ! $access{'supervision'} ) { &redirect("index.cgi"); }
|
|
&redirect( "file_mod.cgi?kfhttps_log&postform=loghttps");
|
|
|
|
exit;
|
|
|
|
|