##
use File::Spec::Functions qw/catfile/;
my $filename = catfile($::folder, $config->{licence});
####
my $folder = 'E:\FOLDER\Test\WEB';
{
license => [ 'kit-licence.zip',
'kit-work.zip'
],
programs => [..
####
use File::Spec::Functions qw/catfile/;
my $filename = catfile($::folder, $config->{licence});