HREF-Link aus einem A-Tag zurückgeben

Um den HREF-Link aus einem HTML-A-Tag zurückzugeben, ist folgende Funktion nützlich.

Sie sucht das nächste A-Tag und extrahiert den durch HREF eingeleitetenden Internetverweis.

function get_link($link) {
   $verweis ="";
	
   // Erst das A-Tag suchen
   $ii = strpos($link, "<a");
   if (!$ii===false) {
      $ii = strpos($link, "< a");
      if (!$ii===false) $ii = strpos($link, "<\ra");
      if (!$ii===false) $ii = strpos($link, "<\na");
      if (!$ii===false) $ii = strpos($link, "<\r\na");
      if (!$ii===false) $ii = strpos($link, "<\n\ra");
      if (!$ii===false) $ii = strpos($link, "<\ta");
      if (!$ii===false) return;
   }
	
   $start = "href=";
   $startlen = strlen($start);

   $ii = strpos($link, $start, $ii);
   if ($ii!=false) {
      $verweis = trim(substr($link, $ii+$startlen));
      // Andere White-Spaces löschen
      $alt = array("\r", "\n", "\t", "\"", ">");	  
      foreach($alt as $aa) $neu[] = "";
      $verweis = trim(str_replace($alt, $neu, $verweis));
      // beim nächsten Leerzeichen abschneiden  
      $verweis = cut_str($verweis, " ");
   }

   return $verweis;
}