ソースコードをHTMLへ変換する

ソースコードをHTMLへ変換するツールをいくつか試したが、しっくり来るものがない。
タブやスペースを" "に変換してくれて、monospaceフォントで出力してほしい。それと可変幅のテーブルで囲わずにページ幅のhrで挟んでほしい。
探すのが面倒なので以下のスクリプトを作った。
以下のスクリプトのHTMLは、以下のスクリプト自体で変換して貼り付けたもの。

blogger-code:

---

#!/usr/bin/perl

print "<hr style=\"border: 2px #9999ff solid;\" />";
print "<pre><span style=\"font-family: 'Courier New', ".
    "Courier, monospace;\">";
while (<>) {
    s/\t/    /g;
    s/&/&amp;/g;
    s/</&lt;/g;
    s/>/&gt;/g;
    s/  /&nbsp;&nbsp;/g;
    print;
}
print "</span></pre>";
print "<hr style=\"border: 2px #9999ff solid;\" />\n";

---