note 28348 deleted from function.var-export by betz
| From: | betz@php.net | Date: | Thu, 20 Feb 2003 12:29:49 +0000 |
| Subject: | note 28348 deleted from function.var-export by betz | ||
| References: | 1 | Groups: | php.notes |
| Request: | Send a blank email to php-notes+get-44255@lists.php.net to get a copy of this message | ||
if (!function_exists("var_export")) {
function var_export_rec($a,$return,$ext_tab_sep,$inside_array)
{
if ($inside_array != False) {
$tab_sep = "";
$sep = ",\n";
} else {
$tab_sep = $ext_tab_sep;
$sep = "\n";
}
$result = "";
switch (gettype($a))
{
case "array":
reset($a);
$result = $tab_sep."array(\n";
while (list($k, $v) = each($a)) {
$result .= $ext_tab_sep."\t$k =>
".var_export_rec($v,$return,$ext_tab_sep."\t",True);
}
$result .= $ext_tab_sep.")".$sep;
break;
case "string":
$result = $tab_sep."'$a'".$sep;
break;
case "boolean":
$result = ($a) ? $tab_sep."true".$sep : $tab_sep."false".$sep;
break;
default:
$result = $tab_sep.$a.$sep;
break;
}
if ($return != False) {
return $result;
} else {
echo $result;
}
}
function var_export($a,$r=False)
{
return var_export_rec($a,$r,"",False);
}
}/* if (!function_exists("var_export")) */