/** * Return a formatted string to help debug array content. */ public static function pretty_debug_array($glue, $array, $indent = '', $keystring = '') { $result = ''; foreach ($array as $key => $item) { $newkeystring = $keystring . '[\'' . $key . '\']'; if (strlen($key) > 80) { $padded = $newkeystring; } else { $padded = str_pad($newkeystring, 80); } $result .= $glue . '@' . $padded . "=\t" . $indent; if (is_array($item)) { $result .= 'ARRAY(count=' . count($item) . ')' . $glue . Context::pretty_debug_array($glue, $item, $indent . ' ', $newkeystring); } else { $result .= print_r($item, TRUE); } } return $result; }