if($linkziel =~ ("/http/i")){
      print "Linktext: ",$link->[1],"\tURL: ",$link->[0],"\n";
    }