Using the module JSON?
Have you read perlintro yes? You should read perlintro, Quote and Quote like Operators, Tutorials: References quick reference
#!/usr/bin/perl --
use strict; use warnings;
use JSON;
Main( @ARGV );
exit( 0 );
sub Main {
my $json = <<'__JSON__';
{"res": { "url":"http://www.astm.org/FULL_TEXT/D5447/HTML/D5447.htm",
+"title":"Standard Guide for Application of a Groundwater Flow Model t
+o a Site-Specific Problem ", "snippet":"1.1 This guide covers the app
+lication and subsequent documentation of a groundwater flow model to
+a particular site or problem. In this context, x201C; groundwater flo
+w model x201D; refers to the application of a mathematical model to t
+he solution of a site-specific groundwater flow problem. 1.2 This gui
+de illustrates the major steps to take in developing a groundwater fl
+ow model that ", "meta":{"gs_designation":"D5447","mc_section":"04","
+mc_maincomm":"D18","mc_date":"2010","mc_dltype":"allstd,active","mc_d
+octype":"Active Standard","mc_addtocart":"PDF-D5447","mc_login":"true
+","mc_suburl":"/SUBSCRIPTION/filtrexx40.cgi?+/usr6/htdocs/newpilot.co
+m/SUBSCRIPTION/REDLINE_PAGES/D5447.htm","mc_relatedurl":"D5447_relate
+d.htm","mc_keywords":" computer model~ groundwater~ simulation~ Groun
+d-water model~ ICS Number Code 13.060.10 (Water of natural resources)
+","gs_year":"04(2010)","gs_collection":"EEE,EEE,OOO","gs_homebook":"0
+408 CS04" } }}
__JSON__
my $perl_scalar = JSON->new->decode($json);
print JSON->new->utf8(1)->pretty(1)->encode($perl_scalar);
print '#' x 6, , "\n";
print $perl_scalar->{res}{title}, "\n";
}
__END__
{
"res" : {
"snippet" : "1.1 This guide covers the application and subsequen
+t documentation of a groundwater flow model to a particular site or p
+roblem. In this context, x201C; groundwater flow model x201D; refers
+to the application of a mathematical model to the solution of a site-
+specific groundwater flow problem. 1.2 This guide illustrates the maj
+or steps to take in developing a groundwater flow model that ",
"url" : "http://www.astm.org/FULL_TEXT/D5447/HTML/D5447.htm",
"title" : "Standard Guide for Application of a Groundwater Flow
+Model to a Site-Specific Problem ",
"meta" : {
"mc_date" : "2010",
"gs_collection" : "EEE,EEE,OOO",
"gs_homebook" : "0408 CS04",
"mc_section" : "04",
"mc_login" : "true",
"mc_maincomm" : "D18",
"mc_keywords" : " computer model~ groundwater~ simulation~ Gr
+ound-water model~ ICS Number Code 13.060.10 (Water of natural resourc
+es)",
"gs_year" : "04(2010)",
"mc_dltype" : "allstd,active",
"mc_relatedurl" : "D5447_related.htm",
"gs_designation" : "D5447",
"mc_addtocart" : "PDF-D5447",
"mc_suburl" : "/SUBSCRIPTION/filtrexx40.cgi?+/usr6/htdocs/new
+pilot.com/SUBSCRIPTION/REDLINE_PAGES/D5447.htm",
"mc_doctype" : "Active Standard"
}
}
}
######
Standard Guide for Application of a Groundwater Flow Model to a Site-S
+pecific Problem
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.