Lines Matching refs:sel
1443 my $sel = "";
1444 $sel = "*" if ($selected{$count});
1451 printf STDERR "%1s %2d %-65s", $sel, $count + 1, $email;
1516 my $sel = substr($nr, 0, 1);
1521 if ($sel eq "y") {
1529 } elsif ($sel eq "*" || $sel eq '^') {
1531 $toggle = 1 if ($sel eq '*');
1535 } elsif ($sel eq "0") {
1539 } elsif ($sel eq "t") {
1561 } elsif ($sel eq "a") {
1571 } elsif ($sel eq "s") {
1581 } elsif ($sel eq "o") {
1584 } elsif ($sel eq "g") {
1591 } elsif ($sel eq "b") {
1598 } elsif ($sel eq "c") {
1603 } elsif ($sel eq "x") {
1608 } elsif ($sel eq "%") {
1613 } elsif ($sel eq "d") {
1620 } elsif ($sel eq "t") {
1623 } elsif ($sel eq "f") {
1626 } elsif ($sel eq "r") {
1629 } elsif ($sel eq "m") {
1633 } elsif ($sel eq "k") {
1636 } elsif ($sel eq "p") {
1641 } elsif ($sel eq "h" || $sel eq "?") {