Lines Matching refs:word
432 my $word = $1;
434 $word =~ s/[\"\'\`](.*)[\"\'\`]\z/$1/;
437 if($word =~ / /) {
438 push @desc, ".IP \"$word\"\n";
441 push @desc, ".IP $word\n";
451 my $word = $1;
453 $word =~ s/[\"\'](.*)[\"\']\z/$1/;
455 if($word eq "PROTOCOLS") {
458 elsif($word eq "AVAILABILITY") {
461 elsif($word eq "%PROTOCOLS%") {
471 elsif($word eq "%AVAILABILITY%") {
480 push @desc, ".SH $word\n";
