Perlの正規表現
特殊記号 | 意味 | 例 |
^ | 文字列の先頭 | ^123:先頭から123の文字 |
$ | 文字列最後 | ^123$:123 のみを含む文字列 |
[ ] | 文字クラス | [A-Z]:大文字 |
| | 選択 | [A|Z]:AまたはZ |
* | 0回以上の繰り返し | A[0-9]*:A,A7,A023,a2222 |
+ | 1回以上の繰り返し | A[0-9]+:A7,A023,a2222 |
{ n } | n回の繰り返し | [0-9]{2}:23,07 |
{ n,m } | n以上m以下の繰り返し | [0-9]{2,3}:23,078 |
{ n,} | n以上の繰り返し | [0-9]{2,}:23,078,22345 |
? | 0か1文字 | A[0-9]?:A,A2 |
\n. | 改行 |
\t | タブ |
\s | 半角スペース、タブ、改行 |
\S | \s以外 |
\w | 半角英数字と_ |
\W | \w以外 |
\d | 半角数字 |
\D | \d以外 |
$univ = '中京大学情報科学部'; $univ =~ s/科学/工学/; print $univ, "\n";これで、