perl에서

if ($a =~ m/^aaa/) {
 ....
}

이렇게 쓰면 $a에 aaa라는 패턴이 없으면 수행하는거 맞음?