#!perl -p
s/^t/ht/