Автоочистка папки access_log

/*
_Read читаем файл возвращаем массив
*/

/*
ЧИСТКА ПАПКИ ACCESS_LOG
*/
function _clean_log()
{
$d = dir(FM_LOGDIR);
while (false !== ($file = $d->read())) {
if (preg_match("#^([0-9]{10})\.php$#is", $file) && (($this->_Nowtime - str_replace('.php', '', $file)) / 86400) > 30) {
unlink(FM_LOGDIR . $file);
}
}
$d->close();
}

$fm->_WriteLog($fm->LANG['LogOuted']);

$fm->_clean_log();