ariels you star!

I changed the line
my $conf = do ('G4 HD:Desktop Folder:perl:test:config.pl');
to
my $conf = do ('G4 HD:Desktop Folder:perl:test:conf.pl');
And it worked as expected.

Thank you.