perl -le 'print join ":", split /(?<=\d\d)(\d\d)/, "123456789"'