#!/usr/bin/perl -n s/‐/-/g; s/−/-/g; s/’/'/g; print;