perl -pe's/(\d)\d/$1/g;s/([A-Z][a-z]*)(\d*)/"$1 ".($2?$2:1)." "/eg;s/ $//'