use LWP::Simple;
use XML::Simple;
use Data::Dumper;
use JSON;
$xml = new XML::Simple;
$url = "http://172.30.40.101:2525/entities/select/?q=entities%3A%22Lashkar-e-Toiba%22&version=2.2&start=0&rows=10&indent=on&fl=entities";
$response =  $xml->XMLin(get $url);
#print Dumper($response->{result}->{doc}->{arr}->{str});
print Dumper($response);
