Select Code to Download

{"ip":["2.3.4.5","2.3.4.5"],"id":"2","host":"www.cnn.com"}
{"ip":["3.4.5.6","1.2.4.5"],"id":"4","host":"www.google.com"}
{"ip":["1.2.3.4"],"id":"1","host":"www.example.com"}
{"ip":["3.4.5.6"],"id":"3","host":"www.google.com"}
{"ip":["2.3.4.5"],"id":"2","host":"www.example2.com"}

{"id":"1","Answer":[{"ip":"1.2.3.4"}],"host":"www.example.com"}
{"id":"2","Answer":[{"ip":"2.3.4.5"},{"ip":"2.3.4.5"}],"host":"www.cnn
+.com"}
{"id":"3","Answer":[{"ip":"3.4.5.6"}],"host":"www.google.com"}
{"id":"4","Answer":[{"ip":"3.4.5.6"},{"ip":"1.2.4.5"}],"host":"www.goo
+gle.com"}
{"id":"2","Answer":[{"ip":"2.3.4.5"}],"host":"www.example2.com"}

#!/usr/bin/perl
use strict;
...
}