[SmallANN] I could do some web with reduced (2Mb) Cuis at last

With getPublicIP
"Report the public IP of this computer
World getPublicIP."

| stream |
stream := HTTPSocket httpGet: 'http://checkip.dyndns.com'.
stream upToAll: 'IP Address: '.
stream := stream upTo: $<.

^ stream

Take me only 47 fileOut .cs from normal Cuis and normal Trunk