#!perl -p0 s/(. *){9}\K.//g