正規表現

Perlの特徴的な機能の一つに正規表現がある。

perlreref - Perl の正規表現のリファレンス - perldoc.jp
Perlの正規表現をマスターしよう - Perl入門ゼミ

簡単に言うと、特定パターンの文字列を探すための機能。

<IN>で入力された行が、A[bB]C("AbC"または"ABC")かどうかを判定しているのだが、while文の条件式もif文の条件式も省略されているところが注意点。
"/"と"/"で挟まれている部分が文字列パターン。

$ vi regular_expression.pl
$ cat test.txt
ABC
DEF
GHI
aaB
aBC
BAC
AAC
AbC
AaB
Abc
$ perl regular_expression.pl
1:ABC
8:AbC
$

test.txtにあれだけの文字列パターンがあって、"A[bB]C"に合致するのは、1番目と8番目。

Sample/perl/regular_expression/regular_expression/src/regular_expression at master · bg1bgst333/Sample · GitHub