-command => sub{ $Selected[$i] = defined $Selected[$i] ? undef : $n;}