if ($tag =~ /^(50[0-2])|(53[0-2])$/)

##</code><code>##

if ($tag =~ /^(50|53)[0-2]$/)

##</code><code>##

if ($tag =~ /^5(0|3)[0-2]$/)    # Note the parentheses ( ) are optional