Select Code to Download

use strict;
use warnings;
...
print "netmask: " , $config->{dict}->{data}->{list}->{dict}->{netmask}
+->{value}->[0] , "\n";
print "gateway: " , $config->{dict}->{data}->{list}->{dict}->{gateway}
+->{value}->[0] , "\n";

<root>
<dict key="status">
...
<value>0</value>
</dict>
</root>