One Hat Cyber Team

Your IP: 216.73.216.133
Server IP: 185.119.109.197
Server: Linux managedhosting.chostar.me 5.15.0-160-generic #170-Ubuntu SMP Wed Oct 1 10:06:56 UTC 2025 x86_64
Server Software: Apache
PHP Version: 8.1.33
Buat File | Buat Folder

Dir : ~/proc/self/root/usr/share/webmin/virtual-server/

View File Name : writelogs.pl

#!/usr/bin/perl
# Receives Apache logs as input, and appends them to the server's log file

$no_acl_check++;
@ARGV == 2 || die "usage: writelogs.pl <domain-id> <file>";
($did, $file) = @ARGV;

if ($file !~ /^\//) {
	do './virtual-server-lib.pl';
	$d = &get_domain($did);
	$d || die "Invalid domain ID $did (user $< error $!)";
	$path = "$d->{'home'}/$file";
	}
else {
	$path = $file;
	}

# Intentionally ignore errors, like a missing logs dir
$| = 1;
if (-l $path) {
	print STDERR "Log target $path is a symlink\n";
	}
else {
	open(FILE, ">>$path") || print STDERR "Failed to open $path : $!";
	select(FILE); $| = 1; select(STDOUT);
	while(<STDIN>) {
		print FILE $_;
		}
	close(FILE);
	}