use base qw (Config::General::Extended);
sub new {
...
  my $self = new SUPER::new (
...