or download this
$line = "cksjdcdbsdcnusageControlAccum:S551(!{\!reportingGroups\!:[{\!
+absoluteAccumulated\!:{\!counters\!:[{\!bidirVolume\!:306490319,\!nam
+e\!:\!base\!}],\!expiryDate\!:{\!volume\!:\!24-07-2014T00:00:00\!},\!
+previousExpiryDate\!:{\!time\!:\!26-06-2014T00:00:00\!,\!volume\!:\!2
+6-06-2014T00:00:00\!},\!reportingLevel\!:\!totalTraffic\!,\!resetPeri
+od\!:{\!volume\!:\!28 days\!}},\!name\!:\!110\!,\!restartInfo\!:\!26-
+06-2014T00:00:00\!,\!selected\!:\!yes\!,\!subscriberGroupName\!:\!GJ_
+FUP_3GEXP_125MB_28\!,\!subscriptionDate\!:\!26-06-2014T00:00:00\!,\!v
+alidityTime\!:3600}],\!version\!:\!2.1\!}!)";
...
$p=~s/\':/\'=>/g;
}
print $p;
or download this
{'reportingGroups' => [{'absoluteAccumulated' => {'counters' => [{'bid
+irVolume'=>306490319,'name'=>'base'}],'expiryDate' => {'volume'=>'24-
+07-2014T00:00:00'},'previousExpiryDate' => {'time'=>'26-06-2014T00:00
+:00','volume'=>'26-06-2014T00:00:00'},'reportingLevel'=>'totalTraffic
+','resetPeriod' => {'volume'=>'28 days'}},'name'=>'110','restartInfo'
+=>'26-06-2014T00:00:00','selected'=>'yes','subscriberGroupName'=>'GJ_
+FUP_3GEXP_125MB_28','subscriptionDate'=>'26-06-2014T00:00:00','validi
+tyTime'=>3600}],'version'=>'2.1'}