Lines Matching refs:sel
1512 my $sel = "";
1513 $sel = "*" if ($selected{$count});
1520 printf STDERR "%1s %2d %-65s", $sel, $count + 1, $email;
1585 my $sel = substr($nr, 0, 1);
1590 if ($sel eq "y") {
1598 } elsif ($sel eq "*" || $sel eq '^') {
1600 $toggle = 1 if ($sel eq '*');
1604 } elsif ($sel eq "0") {
1608 } elsif ($sel eq "t") {
1630 } elsif ($sel eq "a") {
1640 } elsif ($sel eq "s") {
1650 } elsif ($sel eq "o") {
1653 } elsif ($sel eq "g") {
1660 } elsif ($sel eq "b") {
1667 } elsif ($sel eq "c") {
1672 } elsif ($sel eq "x") {
1677 } elsif ($sel eq "%") {
1682 } elsif ($sel eq "d") {
1689 } elsif ($sel eq "t") {
1692 } elsif ($sel eq "f") {
1695 } elsif ($sel eq "r") {
1698 } elsif ($sel eq "m") {
1702 } elsif ($sel eq "k") {
1705 } elsif ($sel eq "p") {
1710 } elsif ($sel eq "h" || $sel eq "?") {