Eigentlich ist das Konzept einer URL unabhängig vom Protokoll definiert und man kann wohl einen etwas einfacheren regulären Ausdruck finden, der generische URLs erkennt.

Der Ausdruck, den Du gefunden hast, versucht allerdings offensichtlich für einige spezifische Protokolle, die auch im RFC 1738 zur Beschreibung des URL-Formates aufgelistet sind, die jeweils spezialisierten URL-Formate zu erkennen, was ihn sichtlich komplexer macht...

Vielleicht könnte man auch diesen Ausdruck kürzer schreiben, aber wer weiß ob das nicht der Intention desjenigen, der ihn kreiert hat, widerspräche ;-)

Also der Ausdruck scheint diese Protokolle abzudecken:
http
ftp
news
nntp
telnet
gopher
wais
mailto
file
prospero
ldap
cid
mid
vemmi
imap
nfs

Würde ich das für perl spezifisch umsetzen, könnte man die Regexp gut um 70% kürzen, da es sich meist um Wiederholungen handeln (die man vorher in variablen packen kann).
auch Konstrukte wie "[a-zA-Z\d]" oder "(?:\d+)" sind zwar richtig, aber etwas seltsam.
(Das letzte ")" scheint zu Fehlen, wenn nicht mich nicht verzählt habe. )

Insgesamt würde ich sagen, dass für 90% aller Fälle ein etwas unspezifischer Ausdruck reichen sollte.