Timo Wintringer: URL erkennen (big Scipt)

Hallo Leute,

zum erkennen von URLs habe ich hier im folgendes Scipt gefunden:

# Basic definitions:
   my $lowalpha       =  '(?:[a-z])';
   my $hialpha        =  '(?:[A-Z])';
   my $alpha          =  "(?:$lowalpha$hialpha)";
   my $digit          =  '(?:\d)';
   my $safe           =  '(?:[$_.+-])';
   my $extra          =  '(?:[!*'(),])';
       .
       .
       .

Leider erkennt dieses Script nicht eine URL in
einer Form von www.xyz.de sondern nur von http://www.xyz.de

Gibt es eine Möglichkeit die oben genannte URL-Form mit diesem Scipt zu erkennen und mit http://www.xyz.de zu verlinken ?

Danke
Timo

  1. Hi,

    Leider erkennt dieses Script nicht eine URL in
    einer Form von www.xyz.de sondern nur von http://www.xyz.de

    das liegt daran, daß "www.xyz.de" keine URL ist.

    Gibt es eine Möglichkeit die oben genannte URL-Form mit diesem Scipt zu erkennen und mit http://www.xyz.de zu verlinken ?

    Man kann das Script modifizieren. Allerdings mußt Du dann davon ausgehen, daß der größte Schrott als URL fehlerkannt wird - z.B. "z.B.".

    Cheatah

    1. Schade,

      es ist halt leider so, dass viele Pressemitteilungen von Firmen, welche ich auf http://www.telnews.de veröffentliche  solche Links enthalten.

      1. Hi,

        es ist halt leider so, dass viele Pressemitteilungen von Firmen, welche ich auf http://www.telnews.de veröffentliche  solche Links enthalten.

        bitte Deine Quellen, korrekte URLs anzugeben. Alles andere hat eine viel zu hohe Fehlerwahrscheinlichkeit, die zu reduzieren vermutlich ein unnötiger Aufwand ist.

        Cheatah

  2. zum erkennen von URLs habe ich hier im folgendes Scipt gefunden:

    # Basic definitions:
       my $lowalpha       =  '(?:[a-z])';
       my $hialpha        =  '(?:[A-Z])';
       my $alpha          =  "(?:$lowalpha$hialpha)";
       my $digit          =  '(?:\d)';
       my $safe           =  '(?:[$_.+-])';
       my $extra          =  '(?:[!*'(),])';

    Sieht sehr nach Abigail aus. perldoc URI::Heuristic