PDF Password Remover script

tell application "Finder"
    set thePath to quoted form of POSIX path of ((item 1 of (get selection)) as text)
    set the clipboard to thePath
    do shell script "cd " & (the clipboard) & "; /usr/local/bin/gs -q -dNOPAUSE -dBATCH -sDEVICE=pdfwrite -sOutputFile=" & (the clipboard) & "-Cracked.pdf -c .setpdfwrite -f " & (the clipboard)
end tell