質問の仕方が悪かったようです.すいません.

$hoge = "hh"; # h は2回だけ
$huga = ($hoge =~ m/h/g); # マッチする
print "$huga\n\a"; # 1
$huga = ($hoge =~ m/h/g); # マッチする
print "$huga\n\a"; # 1
$huga = ($hoge =~ m/h/g); # 3回目マッチしない
print "$huga\n\a"; # ヌルポ 以下同様

となるのですが、これは仕様なのでしょうか…

動作環境:v5.8.6 built for MSWin32-x86-multi-thread