program: input = 'OEBPS/file0011.xhtml#kobo.194.1'; a = re(input, '^OEBPS/file(\d{4})(\.xhtml.*$)', '\1'); strcat('OEBPS/file', format_number(add(a, 1), '04d'), '.xhtml#kobo.1.1')