Init(); if (!$application->isDebugMode()) { die('Restrictred use!'); } $show_var = $application->GetVar('show_var'); if ($show_var) { $var_data = $application->getDBCache($show_var); if ($var_data === false) { echo 'Not Found'; } else { kUtil::print_r( unserialize($var_data), 'Cache "' . $show_var . '" content:', true); } } else { $sql = 'SELECT VarName FROM ' . TABLE_PREFIX . 'SystemCache'; $var_names = $application->Conn->GetCol($sql); foreach ($var_names as $index => $var_name) { $var_names[$index] = '' . $var_name . ''; } kUtil::print_r( $var_names, 'Cache variable names:', true); } $application->Done(); $end = microtime(true);