2013-12-05から1日間の記事一覧
後方参照(キャプチャした部分文字列を正規表現パターンの中で再利用する): #!/usr/bin/env perl use v5.12; use warnings; # 同じ文字列が連続するパターンがあれば「matched」、なければ「not matched」を表示する sub is_matched { my $_ = shift; if (…
後方参照(キャプチャした部分文字列を正規表現パターンの中で再利用する): #!/usr/bin/env perl use v5.12; use warnings; # 同じ文字列が連続するパターンがあれば「matched」、なければ「not matched」を表示する sub is_matched { my $_ = shift; if (…