package ConfigFile;

sub new {
	my $that=shift;
	my $class=ref($that) || $that;
	my $self={ Verbose => 1, RaiseErrors => 0};
	bless $self, $class;	
	return $self;
}

sub get_conf {
   my $self=shift;
   my $param=shift;
   
   my $result; # get result 
   
   return $result;
}

1;