Use of uninitialized value in exists at C:/Perl/lib/Services.pm line 67.
Use of uninitialized value in string ne at C:/Perl/lib/Services.pm line 78.