scp AppleScript for use with Quicksilver or Automator

scp.scpt

tell application "Finder"
	set destination to "user@domain.com"
	set path to "/home/user/upload/path"
	set s to selection
	repeat with eachSelection in s
		set x to eachSelection as string
		set y to POSIX path of x
		do shell script "scp -r \"" & y & "\" " & destination & ":" & path
	end repeat
end tell