servervariablar

hej, skulle behöva en liknande variant som denna, men i php, nån som är sugen att skriva om den?

<%
Response.Write ("<p><b>servervariablar</b><br>")
Blanks ="<p><b>Tomma variablar</b><br>"
For Each Key in Request.Servervariables
If Instr(Key, "_ALL")+Instr(Key,"ALL_")=0 Then
	temp = Trim(Request.Servervariables(Key))
	If Len(temp) =0 Then
		Blanks = Blanks & Key & ","
		Else
			Response.Write Key & " =<b>" & temp & "</b><br>"
		End If
	End If
Next
Response.Write Mid(Blanks,1,Len(Blanks)-2)
%>

Nu kan jag mindre än noll av ASP, men om jag förstod rätt så borde det bli något liknande detta:

<?php

echo "<p><b>servervariablar</b><br>";

$Blanks = "<p><b>Tomma variablar</b><br>";

foreach($_SERVER as $key => $val) {
    if ((is_array($val) && sizeof($val)==0) || 
        (!is_array($val) && strlen(trim($val)) == 0)) {
      $Blanks .= "$key, ";
   } else {
      if (is_array($val)) {
         foreach ($val as $index => $value) {
            echo $key."[$index] = <b>$value</b><br>";
         }
      } else echo "$key = <b>$val</b><br>";
   } 
}

echo substr($Blanks, 0, -2);
?>

Men annars, har du provat:

<php phpinfo(); ?>

åh, vare så enkelt! :bire