AppleScript で Web ページのタイトルをクリップボードにコピー

Web ページのタイトルをブログに書くときに、毎回ソースを開いてコピーするのが面倒だった。なので、これを自動化する AppleScript を書いた。

tell application "Safari"
  set the clipboard to the name of front document **as Unicode text**
end tell

このスクリプトを実行すると、Safari で開いている Web ページのタイトルがクリップボードにコピーされる。

強調部分がないとクリップボードにコピーされないし、ここが as text だと文字化けする。