Script Library: 1238 scripts


REBOL [ Title: "What is my IP" File: %whatismyip.r Author: "Endo" Date: 2010-12-13 Version: 0.0.0 Purpose: {Prints your IP addresses} Library: [ level: 'beginner platform: 'all type: [function one-liner] domain: [network] tested-under: [view WindowsXP Win10] support: none license: 'public-domain see-also: none ] Note: "Updated to use web site" ] what-is-my-ip: has [ip quiet] [ quiet: system/options/quiet system/options/quiet: true print [ read join dns:// read dns:// newline ip: read ] system/options/quiet: quiet if system/product = 'View [ write clipboard:// ip ] ]
halt ;; to terminate script if DO'ne from webpage