package Config;

#Deprecated config file
#Please use shareeconf/*

use strict;
use warnings;
use CGI;
my $q = new CGI;

sub new { 
 my $class = shift;
 my $self = {};
 bless($self,$class);
 return $self; 
}

sub envonline(){
 my $self = shift;
 my %varenv = ();
 return %varenv;
}

1;