Help for this page

Select Code to Download

Select or download this
```
# Title A  2 B
```

Select or download this

if ( $_ =~ /^\S\s+\S+\s[\A\b]/)
              {$sum = 2}
...

if ( $_ =~ /^\S\s+\S+\s\S\s+[\B\b]/)
               {$sum += 1}