perl -ne 'print "A number or a non-capital ASCII letter has been found at position " . pos() ." . There may be more.\n" if /[a-z0-9]/g'