"04abcdefgh" =~ / (\d\d) (??{ ". {".(0 + $^N)."}" }) /x; dd $&; #-> "04abcd"