afscannen poorten

hey iedereen,

ik heb hier op de site een scriptje gevonden voor het pingen naar een bepaalde poort namelijk dit

<?php
function ping($link, $poort){
         $paketten=5;
          $timeout=20;
         for ($i=0;$i<=$paketten;$i++){
             $a=substr(microtime(),11,9)+substr(microtime(),0,10);
             $fs = @fsockopen($link, $poort, $errno, $errstr, $timeout);
             $b=substr(microtime(),11,9)+substr(microtime(),0,10);
             if (!$fs){
                echo $errstr."(".$errno."), dus ";
                $pingtijd="Onbereikbaar?";
                break;
             }
             $pingtijd=$pingtijd+round(($b-$a)*1000);
             @fclose($fs);
         }
         if ($pingtijd=="Onbereikbaar?"){
         }
         else {
              if(($pingtijd/$paketten)<3){
                  $pingtijd="<3 ms";
                  }
                  else {
                  $pingtijd=($pingtijd/$paketten)." ms";
                  }
              }
         return $pingtijd;
}
?> 

Dit is een functie.
Ik wil dit nu gebruiken.
Om te testen of een poort open is of niet op een locale pc.

momenteel roep ik de functie zo aan

<?
$link= $_SERVER['REMOTE_ADDR'];
echo ping($link, $port);
echo '<br><br>volgende <br><br>';
echo ping("$link", 5000);


function ping($link, $poort){
         .....
}
?>

Maar hij geeft niet het resultaat dat ik wil en ik weet niet waarom hij het niet doe.

Je kunt het resultaat zien op

http://www.foncke.eu/ports.php


hopelijk kan iemand mij helpen.