In your casse the problem is very familiar to all the people who are familiar in coding using the module 'strict' You are using strict or warnings some where in the place where you call this package.

Declare the variable as follows :-

our @ISA = ('Exporter'); # create an Exporter object.

our @EXPORT = qw($x $TestCase $TSPass $ConfigFile $TCPass);

this will solve your problem