-command => sub { resort (\$sortflag, \@item) ; }