use Config::Tiny;
# Open the config
   $Config = Config::Tiny->read( 'test.cfg' );

   # Reading properties
   my $rootproperty = $Config->{_}->{rootproperty};
   my $one = $Config->{section}->{one};
   my $Foo = $Config->{section}->{Foo};

   # Save a config
   $Config->write( 'test.cfg' );