How can i bulk rename music files in reverse order from artist - song name to songname - artist

Question

How can I bulk rename music files in reverse order from artist - song name to songname - artist.
I actually dont need to rename the actual files.
Its just i have a huge txt list of 100,000 music names that are listed as so..
Artist - Song Name
Artist - Song Name
Artist - Song Name
Artist - Song Name
Artist - Song Name
Artist - Song Name
and i need this list to reverse it self so it is listed in the list as
Song Name - Artist
Song Name - Artist
Song Name - Artist
Song Name - Artist
Song Name - Artist
Song Name - Artist
Song Name - Artist
Im sure there is some kinda way to auto a mix of applescript/automator/terminal to do something like:  all char before the "-" replace with the chars after the "-".
Please some one help me if you know how I can pull this off

Answer 1

How can I bulk rename music files in reverse order from artist - song name to songname - artist.
I actually dont need to rename the actual files.
Its just i have a huge txt list of 100,000 music names that are listed as so.
I wonder if we haven't misunderstood what you were asking for. Could it be that you have not a huge file, but just a huge list of names in many small files. If that's the case, you should rather use the following script instead of the previous one.
Since this script does not rename the files, make a backup of your files before running it.
set theFolder to choose folder -- the folder containing your text files
tell application "Finder"
    set theNames to name of files of theFolder whose name extension is "txt"
end tell
set theTextFiles to {}
set theFolderPath to POSIX path of theFolder
repeat with thisName in theNames
    copy theFolderPath & thisName to the end of theTextFiles
end repeat
repeat with thisFile in theTextFiles
    set F1 to open for access thisFile
    set theText to read F1
    close access F1
    set theParagraphs to paragraphs of theText
    set bigList to (a reference to theParagraphs)
    set theNewParagraphs to {}
    set bigNewList to (a reference to theNewParagraphs)
    repeat with X in bigList
        set P to offset of " - " in X
        if P = 0 then
            set Y to X
        else
            set Y to text (P + 3) through -1 of X & " - " & text 1 through (P - 1) of X
        end if
        copy Y & return to the end of bigNewList
    end repeat
    set theNewText to text 1 through -2 of (bigNewList as text)
    set F2 to open for access thisFile with write permission
    set eof F2 to 0
    write theNewText to F2
    close access F2
end repeat
display dialog "Done!" buttons {"OK"} default button 1 with icon 1
Message was edited by: Pierre L.