duplicate file and add text after suffix

Can anyone help me with the following:

I need a script (droplet) or folder action witch has to do this:
Duplicate the files and add “some text” after the prefix.

That’s all

–Peter–

Hi Peter,

try this droplet

property sometext : "some text"
on open theseFiles
	repeat with oneFile in theseFiles
		set {name:Nm, name extension:Ex, folder:Fo} to info for oneFile
		if not Fo then
			if Ex is missing value then set Ex to ""
			if Ex is not "" then set Nm to text 1 thru ((count Nm) - (count Ex) - 1) of Nm
			tell application "Finder"
				set Dup to duplicate oneFile
				set name of Dup to Nm & sometext & "." & Ex
			end tell
		end if
	end repeat
end open