{
  my $i;
  @statusoption = grep { $i or ($_ eq $status && ++$i) } @statusoption;
}