Updated 2018-08-24 14:54:30 by pooryorick

Created by CecilWesterhof.

Often you want to know your external IP-address. For this I created the following proc:
proc getExternalIP {} {
    set             token [http::geturl http://myexternalip.com/raw]
    set             externalIP [string trim [http::data $token]]
    ::http::cleanup $token
    return          $externalIP
}

It depends on:
package require http

And it expects that http://myexternalip.com/raw returns your external IP-address.

As always: comments, tips and questions are appreciated.

See also  edit