Help for this page
DB<106> $str='A B C' => "A B C" ... DB<108> scalar @matches => 3
DB<115> $str='A B C' => "A B C" ... DB<118> $str !~ /[A-Z].*[A-Z]/ => 1