@sen=split(/\s+/,$sent);