#!perl -p s/^h//