Config::General save_file() not converting named block to nested block when there is only one block

[Frans Spiesschaert]

Hi,

This is my exmple.pl

#!/usr/bin/perl -w

use strict;
use Config::General;

my $datafilename = 'example.conf';
my %confighash;
my $config = \%confighash;
$config->{client}->{Bob}->{city} = 'Brussels';
$config->{client}->{Jane}->{city} = 'Antwerp';

my $datafile = Config::General->new;
$datafile->save_file($datafilename, $config);


and that gives as expected the following result:

<client>
    <Jane>
        city   Antwerp
    </Jane>
    <Bob>
        city   Brussels
    </Bob>
</client>


but when I comment out in that file the line:
# $config->{client}->{Jane}->{city} = 'Antwerp';

I get the following result:

<client Bob>
    city   Brussels
</client>

But also in such a case I want to get 

<client> 
   <Bob>
        city   Brussels
   </Bob>
</client>

Is there a way to get this result in such a case?


-- 
Kind regards,
Frans Spiesschaert

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/