表紙 | 新規 | 編集 | 編集 | 差分 | 一覧 | RSS | 検索 | 閲覧履歴 | 作成履歴 | 更新履歴

unescape関数 - YukiWikiベースのPonyWikiのソースを読んでみる その18

YukiWikiベースのPonyWikiのソースを読んでみる その18

escape関数で置換した実態参照を、元の記号に戻す。

sub unescape {
    my $s = shift;
    # $s =~ s|\n|\r\n|g;
    $s =~ s|\&|\&|g;
    $s =~ s|\&lt;|\<|g;
    $s =~ s|\&gt;|\>|g;
    $s =~ s|\&quot;|\"|g;
    return $s;
}

''TrackBack'' - http://you-like.to/cgi-bin/ponytail/yukiwiki/wiki.cgi/unescape%b4%d8%bf%f4

先頭へ