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

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

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

htmlのタグを取り除く関数

sub remove_tag {
    my ($line) = @_;
    $line =~ s|\<\/?[A-Za-z][^>]*?\>||g;
    return $line;
}

先頭へ