How to read Array

sunilgame has asked for the wisdom of the Perl Monks concerning the following question:

How to read below array

my $json = '[{"dns_zone": {"created_at":"2013-07-08T02:21:57-05:00","i
+d":752,"name":"aressindia.com","updated_at":"2013-07-08T02:21:57-05:0
+0","user_id":136,
    "records":
     {
       "SOA":[
         {"dns_record":{
          "expire":2419200,"hostmaster":"rajnesh@aressindia.net","id":
+122329,"minimum":10800,"name":"@","primaryNs":"ns1.qwkdns.com","refre
+sh":7200,"retry":900,"serial":2013032112,"ttl":86400,"type":"SOA"}
         }
        ]
      }
     }
     }
  ]';
[download]

I need read above value

print $json->{dns_zone}->{records}->{SOA}->{dns_record}->{expire}
[download]

Awaiting feedback

Back to Seekers of Perl Wisdom