if (($Entry > 0) && ($ID[$Entry] eq $ID[$Entry - 1])) {
		
if ($Value_1[$Entry] =~ m/($Value_1[$Entry - 1])/) {
			
$Placeholder = join(' / '$Value_1[$Entry], $Value_1[$Entry - 1]);

delete $Value[$Entry - 1];
push(@Value, $Placeholder);
			
	etc...		}