--=====
set texte to "a2:fh:2f:vv:i1:q1"
set texte to my changeCase(texte, "upper")
set texte to my supprime(texte, ":")
texte
--=====
(*
removes every occurences of d in text t
*)
on supprime(t, d)
local oTIDs, l
set oTIDs to AppleScript's text item delimiters
set AppleScript's text item delimiters to d
set l to text items of t
set AppleScript's text item delimiters to ""
set t to l as text
set AppleScript's text item delimiters to oTIDs
return t
end supprime
--=====
(*
Le second argument peut être: "upper", "lower", "title", "capitalize"
*)
on changeCase(txt, mode)
set python_script to "import sys; print sys.argv[1].decode('utf8')." & mode & "().encode('utf8')"
return do shell script "/usr/bin/python -c " & quoted form of python_script & " " & quoted form of txt
end changeCase
--=====