文字列の先頭にマッチさせる - \A

正規表現で文字列の先頭を表現するには\Aを使用します。

# 文字列の先頭
\A

「^」と異なるのは、mオプションを使用した場合でも意味が変わらないということです。mオプションを使用した場合は「^」は文字列の先頭ではなく、行の先頭を表現するようになります。

my $str = "abc\ndef";
if ($str =~ /\Acat/m) {
  # 文字列の先頭にマッチ
}