translate(upper(substr(my_column,2,1)),'QWERTYUIOPASDFGHJKLZXCVBNM','AAAAAAAAAAAAAAAAAAAAAAAAAAA')) = 'A'

would do it (check the number of A's, not sure i got it right), or you could check for an ascii code BETWEEN two appropriate values.