#!perl -p
s/.\cH//g;