Help for this page
Unmatched [ in regex; marked by <-- HERE in m/([ <-- HERE B|b)
/([B|b)/
if ($_ = /([A|a])/) {