if ($array[0]!='W') {
  OutputCharacter($char,$count,$length,@id);
  @id=();
}