$event{'desc'} =~ s/’/\&\#39\;/g;
$event{'desc'} =~ s/–/-/g;
$event{'desc'} =~ s/—/ - /g;
$event{'desc'} =~ s/‘/'/g;
$event{'desc'} =~ s/'/'/g;
$event{'desc'} =~ s/“/"/g;
$event{'desc'} =~ s/”/"/g;