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