#!perl -p
s;^h;