ブログからRSSを取得してPerlで解析して、jsを出力し、
エントリー概要をhtmlに表示するスクリプトなのですが

open OUTPUT, ">./data/rss.js";

foreach my $item ( @{$rss->{'items'}} ) {
print OUTPUT<<TEXT;
document.write('<a href="$item->{'link'}" target="blank">$item->{'title'}</a>');
TEXT
}

そのブログのエントリー名にシングルクォートが使われると
document.write('  ');でかこんでる部分が、シングルクォートの中に
シングルクォートが入ってhtmlに出力されなくなります。

その問題を解決するにはどういったスクリプトを書けばよいでしょうか?

どうぞヨロシクお願いいたしますm(_ _)m