Help for this page

Select Code to Download

Select or download this

map { $_ eq $label ? 'MUTS' : '_' } @headers[1..$#headers];

Select or download this

#!/usr/bin/perl

...
B       MUTS    W       W       W       W       MUTS    MUTS
C       MUTS    MUTS    MUTS    W       W       W       W
C       MUTS    W       W       MUTS    MUTS    W       W