Import a folder of text files into Evernote (OSX/AppleScript)

gistfile1.txt

tell application "Finder"
	set fl to files of folder POSIX file "/Users/pi/Desktop/VoodoopadExport" as alias list
end tell
repeat with f in fl
	set theText to (do shell script "cat " & quoted form of (POSIX path of f))
	set theName to (do shell script "basename " & quoted form of (POSIX path of f))
	tell application "Evernote"
		create note with text theText title theName notebook "private" tags "VoodooPad"
	end tell
end repeat