You are right, '!=' should have been 'ne'.
The code I posted simply stores/remembers any value that isn't 'W'. Because I assumed that the length column has only one value to remember (per character), I used a variable instead of an array for the length column.
Whenever you encounter a new character name in the loop, call a subroutine to output the previous character. I.e. add the following line before the other lines I posted:
if ($array[0]!='W') {
OutputCharacter($char,$count,$length,@id);
@id=();
}
The subroutine OutputCharacter just prints one line per value in @id, and in the first line also the name, count and length. One way to do that is to print the first line separately and then the rest in a loop
|