http://qs321.pair.com?node_id=1219839


in reply to Re^2: Iterate JSON File
in thread Iterate JSON File

How about just using:

print $elem . "=" . $status->{$elem} . "\n" if ( $elem eq 'kind' );

instead of the original print statement?

Also see AnomalousMonk post above Re^3: Iterate JSON File about Data::Dumper.