Evaluated proc gis args { pwget {imgurl=(.+?)&} http://images.google.com/images?safe=off&q=[urlencode $args] }