These snippets of code can be used to check if an URL is valid or not and with some changes it can get URL's from a text. ---- ====== # # Check if an URL is valid or not... # set blabla {http://www.ietf.org/rfc/rfc3986.txt} if {[regexp -- {^(https?://[a-z0-9\-]+\.[a-z0-9\-\.]+(?:/|(?:/[a-zA-Z0-9!#\$%&'\*\+,\-\.:;=\?@\[\]_~]+)*)))$} $blabla match url]} { puts "$url is a valid url." } # # Getting an URL from a HTML code... # set blabla {