...is that these folks can't even recognize a very well known data structure when they see it. It's JSON data.
It should be accessed accordingly, not with regex which will break on the slightest change.
use warnings; use strict; use Data::Dumper; use JSON; my $json = <DATA>; my $perl = decode_json $json; print Dumper $perl; __DATA__ {"maps":{"idOthers":{"label":"Others","state":1,"bkmrk":{"id1517321708 +544042":{"label":"Thornbury","latlng":"-37.758959,145.002408","z":15} +,"id1517404948177044":{"label":"SE Oz","latlng":"-37.383253,146.79931 +6","z":7},"id1524907539056020":{"label":"Melbourne wide","latlng":"-3 +7.736512,145.266724","z":10},"id1526128108894092":{"label":"Melbourne + city","latlng":"-37.814412,144.963698","z":15}}}},"portals":{"idOthe +rs":{"label":"Others","state":1,"bkmrk":{"id1519870156505020":{"guid" +:"bd3c83881e864833a1d6ba7f74d48932.16","latlng":"-28.101867,140.19891 +2","label":"Moomba Airport"},"id1524017293988041":{"guid":"5d28dfb8e5 +c74235bcb6ebabe7db137e.16","latlng":"-38.052737,140.699065","label":" +MacDonnell Water Tower"},"id1524017431668144":{"guid":"cef5a3a6052b4d +b5918f240633c87d1a.16","latlng":"-35.354197,145.725536","label":"Horg +an Walk"},"id1524017542894278":{"guid":"981d883b207a4f469d1cfd6ef6a83 +c99.16","latlng":"-35.651077,145.572401","label":"Finley and District + Museum"},"id1524017595214323":{"guid":"9c02931bd84a44f09d0eb7d528440 +dde.16","latlng":"-40.121934,148.016741","label":"Flinders Anchor"}," +id1524018796438428":{"guid":"729ba75fe8af4915ad0171398308dd1a.16","la +tlng":"-34.276904,146.053927","label":"Griffith Water Tank 3"},"id152 +4018933096574":{"guid":"f9f356e2a6cb4311b8d5e6b8597e9f10.16","latlng" +:"-38.379673,141.369564","label":"The Blowholes"},"id1524573178960029 +":{"guid":"4807ea2a1f5446eca437f30d00249070.16","latlng":"-35.812108, +145.564549","label":"Murraay Valley Trail"},"id1524573424316121":{"gu +id":"da1fa66c47e04ab8bd63ca889477fc64.16","latlng":"-35.919043,145.64 +944","label":"Cobram Court House"},"id1525240907654076":{"guid":"f7f0 +413875e849f0bd4144deeb2e1dd3.16","latlng":"-37.10952,142.412065","lab +el":"Keep Wildlife Wild"},"id1524573612772224":{"guid":"ee648daae1954 +dfaae922dbf8b73b628.16","latlng":"-35.355555,145.725977","label":"Jer +ilderie Library"}}}}}
Get the data from the structure, and it can be used properly. The main fault of that entire post is that everyone was assuming it was "text".
In reply to Re: the sad reality of perl
by stevieb
in thread the sad reality of perl
by morgon
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |