my $np_new = 'usr/castle/np_new/' my $temp = 'usr/castle/pctemp' #### copy ($fileName, $np_new.'/usr/castle/pctemp/'$dest{$search}) #### copy ($fileName, $np_new.'/usr/castle/pctemp/' . $dest{$search}) # ^ (concatenation)