"&8" =~ /^(?=.*([A-Z]))(?=.*(\d))/ and print "[@-][@+]";;

"A8" =~ /^(?=.*([A-Z]))(?=.*(\d))/ and print "[@-][@+]";;
[0 0 1][0 1 2]

"A+8" =~ /^(?=.*([A-Z]))(?=.*(\d))/ and print "[@-][@+]";;
[0 0 2][0 1 3]