you can use
if ($len($1-) > 5) { var %percent $calc($regex($1-,/[A-Z]/g)/$len($1-)*100) if (%percent > %caps) {
then you can have a way to set the percent of caps you want to kick for like
alias capset { set %caps $1 | echo -a I will Now Kick For $1 $+ % Caps }
or what ever