AppleScript技术求助：如何给末尾带前后字母的数字加1

嘿，很高兴看到你已经在AppleScript的路上摸索出了自己的流程！针对你提到的「文件名末尾数字前后带字母」的场景，我们可以借助正则表达式结合Shell工具来轻松实现需求，完美适配_A288.tif、_288A.tif这类格式，同时也兼容你原来的纯数字末尾文件名。

完整脚本实现 #

这个脚本会严格遵循你既定的流程：读取剪贴板文件名→修改数字→放回剪贴板：

-- 读取剪贴板中的原始文件名
set originalFileName to the clipboard as text

-- 通过Perl正则定位最后一组连续数字并加1
set modifiedFileName to do shell script "echo " & quoted form of originalFileName & " | perl -pe 's/(.*?)(\\d+)(.*\\.tif)/$1 . ($2 + 1) . $3/ge'"

-- 将修改后的文件名写回剪贴板
set the clipboard to modifiedFileName

关键逻辑解释 #

1. quoted form of：用来处理文件名中可能包含的空格、特殊字符，避免Shell解析时出错，保证文件名能被正确传递。
2. Perl正则与替换规则：
   • 正则(.*?)(\d+)(.*\.tif)精准拆分文件名：
     • (.*?)：非贪婪匹配数字前的所有字符（确保我们找到的是最后一组连续数字）
     • (\d+)：匹配需要加1的连续数字序列
     • (.*\.tif)：匹配数字后直到.tif后缀的所有字符
   • /ge标志：e允许我们把替换内容当作代码执行，这样$2 + 1就能直接实现数字加1的操作；g保证全局匹配（不过这里非贪婪模式已经锁定了最后一组数字，实际单组替换也生效）

测试验证 #

这个脚本可以完美处理你提到的各种场景：

• 原格式RM5_CA_0_4C_288.tif → 输出RM5_CA_0_4C_289.tif（兼容原有功能）
• 带前缀字母_A288.tif → 输出_A289.tif
• 带后缀字母_288A.tif → 输出_289A.tif

扩展小提示 #

如果需要处理其他文件后缀（比如.png、.jpg），可以把正则里的\.tif改成\.\w+，这样就能匹配任意常见后缀啦。

内容的提问来源于stack exchange，提问作者matfretschel