正規表現の作成


 Regexp::Assembleモジュールを使うと、与えた文字列にマッチする正規表現を作成できます。
use strict;
use encoding 'shift-jis';
use Regexp::Assemble;

my $regexp = new Regexp::Assemble;

$regexp->add('日本人');
$regexp->add('日本海');
$regexp->add('日本新記録');
$regexp->add('日の丸');
$regexp->add('Perl');
$regexp->add('PHP');

print $regexp->re, "\n";

関連項目

なし