Parsing this kind of data <p>I have written a wrapper for an API. Previously I'd worked on simple string-based GET requests to PHP scripts using Perl.</p> <p>As part of analysing the response, I have to analyse the following data which appears to be an object. Unfortunately, I'm not sure how to extract usable data from this.</p> <p><code>print Dumper</code> on the data returns this:</p> <pre><code>$VAR1 = bless( { '_rc' =&gt; '200', '_request' =&gt; bless( { '_uri_canonical' =&gt; bless( do{\(my $o = 'http://example.com/?list=1&amp;token=h_DQ-3lru6uy_Zy0w-KXGbPm_b9llY3LAAAAALSF1roAAAAANxAtg49JqlUAAAAA')}, 'URI::http' ), '_content' =&gt; '', '_uri' =&gt; $VAR1-&gt;{'_request'}{'_uri_canonical'}, '_method' =&gt; 'GET', '_headers' =&gt; bless( { 'accept-charset' =&gt; 'iso-8859-1,*,utf-8', 'accept' =&gt; 'image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, image/png, */*', 'cookie' =&gt; 'GUID=cHoW3DLOljP4K9LzposM', 'user-agent' =&gt; 'Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.7) Gecko/20041107 Firefox/1.0', 'authorization' =&gt; 'Basic YWRtaW46bmljb2xl', 'cookie2' =&gt; '$Version="1"', '::std_case' =&gt; { 'cookie' =&gt; 'Cookie', 'cookie2' =&gt; 'Cookie2' }, 'accept-language' =&gt; 'en-US' }, 'HTTP::Headers' ) }, 'HTTP::Request' ), '_headers' =&gt; bless( { 'client-peer' =&gt; 'myip:8085', 'content-type' =&gt; 'text/plain', 'cache-control' =&gt; 'no-cache', 'connection' =&gt; 'keep-alive', 'client-date' =&gt; 'Sat, 18 Jul 2015 12:41:00 GMT', '::std_case' =&gt; { 'client-response-num' =&gt; 'Client-Response-Num', 'set-cookie2' =&gt; 'Set-Cookie2', 'client-date' =&gt; 'Client-Date', 'client-peer' =&gt; 'Client-Peer', 'set-cookie' =&gt; 'Set-Cookie' }, 'client-response-num' =&gt; 1, 'content-length' =&gt; '8684' }, 'HTTP::Headers' ), '_msg' =&gt; 'OK', '_protocol' =&gt; 'HTTP/1.1', '_content' =&gt; '{"build":30470,"torrents": [ ["043CC5FA0C741CDAD9D2E5CC20DF64A4A400FA34",136,"Epi.S01E03.720p.HDTV.x264-IMMERSE[rarbg]",690765843,39,26951680,671744,24,0,0,0,"",0,1454,0,114,2436,1,663814163,"","","Stopped","512840d7",1437022635,0,"","/mydir/Epi.S01E03.720p.HDTV.x264-IMMERSE[rarbg]",0,"0368737A",false], ["097AA60280AE3E4BA8741192CB015EE06BD9F992",200,"Epi.S01E04.HDTV.x264-KILLERS[ettv]",221928759,1000,221928759,8890308649,40059,0,0,0,"",0,1461,0,4395,65536,-1,0,"","","Queued Seed","512840d8",1437022635,1437023190,"","/mydir/Epi.S01E04.HDTV.x264-KILLERS[ettv]",0,"8F52310A",false]], "label": [],"torrentc": "350372445" ,"rssfeeds": [] ,"rssfilters": [] } ', '_msg' =&gt; 'OK', '_protocol' =&gt; 'HTTP/1.1' }, 'HTTP::Response' ); </code></pre> <p>I would like to extract each of the following strings from the returned object</p> <pre><code>097AA60280AE3E4BA8741192CB015EE06BD9F992 200 Epi.S01E04.HDTV.x264-KILLERS[ettv] </code></pre> <p>Unfortunately, my understanding of objects in Perl is very elementary.</p> <p>The original code which returns this data looks like this:</p> <pre><code>my $ua = LWP::UserAgent-&gt;new(); my $response = $ua-&gt;get( $url, @ns_headers ); print Dumper($response); </code></pre> <p>How can I work on the strings that of interest?</p>