xNeTworKx: regulärer Ausdruck gesucht

Beitrag lesen

Hallo,
ich suche einen GANZ GENAUEN regulären Ausdruck, der eine Internetadresse prüft. Momentan hab ich mir zwar einen zusammengeschnipselt, jedoch lässt der noch viele Schlupflöcher offen.
Die Probleme sind hauptsächlich :
Wie kann ich das ganze www optional machen.
Wie kann ich mehrere Bindestriche zwichen den Buchstaben optional machen.
So weit bin ich bis jetzt.

$hpadresse =~ /http://www?.?\w+?-?\w+?.\w{2,4}/

Reg. Expr. sind leider nicht meine Stärke, deswegen würd ich mich freuen wenn mir jemand weiterhelfen könnte , danke.