戻る

英名を正規化する

0001: # 名前の正規化をする
0002: # 連続する空白を1個に詰める
0003: $pvalue{ENAME}=~s/  */ /g;
0004: # 前後の空白を削除する
0005: $pvalue{ENAME}=~s/^ *//g;
0006: $pvalue{ENAME}=~s/ *$//g;
0007: # 大文字に揃える
0008: my($uc)=uc($pvalue{ENAME});
0009: # シングルクォートのエスケープ
0010: $uc=~s/\'/\'\'/g;

この HTML を検査する。( XHTML 1.0 Strict で書かれています )
Another HTML Lint Gateway ( Mirrored by htmllint.oosato.org )