if($str=~/^(L+)/ or $str=~/^(L+C)/)