- or download this
# works
print $ref->{incident}->{'GDOT-INC-260089'}->{location}->{county}->{co
+ntent} . "\n";
# doesnt work
print $ref->{'incident'}->[0];
- or download this
print $ref->{incident}->[0]->{location}->{county}->{content} . "\n";
- or download this
my @sorted_keys = sort keys %{$ref->{incident}};
for my $incid ( @sorted_keys ) {
# do something with $$ref{incident}{incid} ...
}