Perlの正規表現を使って、HTMLの中にあるJavascript部分を取り除いてみた。 - Perl楽しいから好き

Perlの正規表現を使って、HTMLの中にあるJavascript部分を取り除いてみた。 - Perl楽しいから好き

HTMLの中のコンテンツ部分だけ抽出したい、という欲望がムクムクと湧いてきたのでPerlの正規表現で書い...概要を表示 HTMLの中のコンテンツ部分だけ抽出したい、という欲望がムクムクと湧いてきたのでPerlの正規表現で書いてみました。これまでも、HTMLタグを取り除く処理は書いたことあるんですが、「欲張りでない量指定子」(Non-Greedy Matches)が理解できてなかったので、Javascriptの中身が残ってしまうといった失敗をしていました。『初めてのPerl』（リャマ本）7章～9章を読み直して、だいぶ理解できた気がする。 #!/usr/bin/env perl use strict; use warnings; use utf8; use feature qw/say/; use Encode qw/encode/; my $html; while(<DATA>){ chomp; $html .= $_; } # javascript部分を除去 $html =~ s#<script.*?>.*

• Perl