Lines Matching refs:key

167     my $key;
179 	    $key = uc $1;
180 	    $key =~ s/^\s+//;
181 	    $key =~ s/\s+$//;
184 	    if ($key =~ s/^([<>=])\s*//)
190 	    elsif ($key eq _('NAME') or $key eq _('SYNOPSIS'))
199 	    push @sections, $key;
209 	    eval { $key = qr($pat) };
223 	unless ($key)
235 	$hash->{$key} .= $_;
241 	unless $key;