DB<17>  $_=1113333444455;  m/(\d{3})(?{ print $1 })(?=\d{3})$/
455