在下图中，我正在尝试编辑 cat 目录中的每个文件名，使其仅包含一个“。”例如，对于所有其他文件名，我需要第一个文件名是 cat1.jpg 等等。
你们中的任何人都介意提供一些指导，告诉我如何实现 AppleScript（使用 Automator？）来重命名这个 cat 目录中的所有文件吗？
【问题讨论】：
标签： macos terminal applescript automator
假设您要重命名的所有文件都位于桌面上名为“Cat”的文件夹中
以下 AppleScript 代码将删除“.”的第一个实例...在它的位置留下一个空白空间。因此，“cat.1.jpg”将被重命名为“cat 1.jpg”等。
property theFolder : ((path to desktop) as text) & "Cat"
property originalFileName : missing value
property originalFileNameExtension : missing value
tell application "Finder" to set theFiles to (files of folder theFolder) as alias list
repeat with i from 1 to count of theFiles
set thisItem to item i of theFiles
tell application "System Events"
set fileInfo to thisItem's properties
set {originalFileName, originalFileNameExtension} to ¬
{name of fileInfo, name extension of fileInfo}
end tell
set theOffset to offset of originalFileNameExtension in originalFileName
set shortName to text 1 thru (theOffset - 2) of originalFileName
set text item delimiters to "."
set tempText to every text item of shortName
set text item delimiters to " "
set cleanedName to (tempText as text) & "." & originalFileNameExtension
tell application "System Events" to set name of thisItem to cleanedName
end repeat
这将是您问题的完整 AppleScript 解决方案。但是，如果这对您来说只是一次性事件，那么通过 Finder 批量重命名文件将是一种更快的解决方案。
【讨论】：
回答标题中的问题，一旦您在repeat 循环中循环遍历字符串，就可以从字符串中删除字符串的第一个实例：
使用offset：
set s to "foo.bar.txt"
set o to offset of "." in s
set r to (text 1 thru (o - 1) of s) & (text (o + 1) thru -1 of s)
使用Applescript's Text Item Delimiters：
set AppleScript's text item delimiters to "."
set l to text items of s
set r to (item 1 of l) & (text items 2 thru -1 of l as string)
set AppleScript's text item delimiters to ""
【讨论】：
repeat loop 的使用并仅显示文本项分隔符的代码......提供了一个不完整的解决方案。为什么不提供repeat loop 的代码呢？此外，您的解决方案缺少实际更改文件名的代码。