diff options
Diffstat (limited to 'url-picker')
-rw-r--r-- | url-picker | 10 |
1 files changed, 4 insertions, 6 deletions
@@ -5,12 +5,10 @@ my $url = qr{ (?:https?://|ftp://|news://|mailto:|file://|\bwww\.) - [a-zA-Z0-9\-\@;\/?:&=%\$_.+!*\x27,~#]* - ( - # Allow a pair of matched parentheses - \([a-zA-Z0-9\-\@;\/?:&=%\$_.+!*\x27,~#]*\)| - # exclude some trailing characters (heuristic) - [a-zA-Z0-9\-\@;\/?:&=%\$_+*~] + [\w\-\@;\/?:&=%\$.+!*\x27,~#]* + ( + \([\w\-\@;\/?:&=%\$.+!*\x27,~#]*\)| # Allow a pair of matched parentheses + [\w\-\@;\/?:&=%\$+*~] # exclude some trailing characters (heuristic) )+ }x; |