s/./~$&le~$'/ger||print$_,$/for 12..7e3