set txt to ""
tell application "Safari" to tell window 1
	repeat with i from 1 to (count tabs)
		tell tab i to set txt to txt & "[" & i & "]: " & URL & linefeed
	end repeat
end tell
set the clipboard to txt