Select Code to Download

while (my ($parent_key,$hashref) = each %soapResult) {
    print "$parent_key:\n";
    while (my ($info_key,$value) = each %$hashref) {
        print "\t$info_key: $value\n";
    }
}