How would i in the simplest way calc the % of caps in a sentense ? like if $isupper($1-) is 100% .. but lest say i want to trigger somthing if $isupper = 50% ?