Lines Matching refs:s
91 for my $s (sort @sa) {
92 push @o, sprintf "%s.BR $s", $comma ? ",\n": "";
109 my @s = sort @p;
111 for my $e (sort @s) {
112 push @o, sprintf "%s%s",
113 $comma ? (($e eq $s[-1]) ? " and " : ", "): "",
118 if($s[0] eq "All") {
139 my @s = sort @t;
140 for my $e (@s) {
141 push @o, sprintf "%s$e",
142 $comma ? (($e eq $s[-1]) ? " and " : ", "): "";
