Get External IP-address

Difference between version 0 and 1 - Previous - Next

Created by [CecilWesterhof].

Often you want to know your external IP-address. For this I created the following proc:
======
proc getExternalIP {} {    rseturn [string trim [h          ttp::dataoken [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.

<<categories>>Utilities