Remove file extension from evernote note titles (example)

gistfile1.applescript

tell application "Evernote"
    set theNotebooks to every notebook
    repeat with eachNotebook in theNotebooks
        set theNotes to every note in eachNotebook
        repeat with eachNote in theNotes
            set theoldTitle to the title of eachNote
            if the length of theoldTitle > 4 then
                set theEnding to characters -4 thru -1 of theoldTitle as string
                if theEnding is ".pdf" then
                    set theNewTitle to characters 1 thru -5 of theoldTitle as string
                    set the title of eachNote to theNewTitle
                end if
            end if
        end repeat
    end repeat
end tell