set playlistName to «data utxt%@» as Unicode text
tell application "iTunes"
	make new playlist with properties {name:playlistName}
end tell