このPerlスクリプトは"のような非HTMLキャラクタをHTML形式(")に変換する ものです。今のところ完全ではありませんが、-実は変換するキャラクタのリストを追加拡張 しなくてはならないのですが-、たいていは間に合うと思います。スクリプトは以下のようなものです:
#!perl # EnHTML by Peter N. Lewis # Jan 1997 use Mac::BBEdit; $text = Copy; if ($text eq "") { SetSelection( 0, 99999999 ); $text = Copy; } PresetUndo; $text =‾ s/;/&#59;/g; # fix special chars $text =‾ s/&/&amp;/g; $text =‾ s/</&lt;/g; $text =‾ s/>/&gt;/g; $text =‾ s/¥"/&quot;/g; $text =‾ s/"/&quot;/g; $text =‾ s/"/&quot;/g; $text =‾ s/'/'/g; $text =‾ s/'/'/g; Paste $text; SetUndo;
ホーム | もくじ | 設定 | HTML | テクニック | その他 | フィードバック |