Lines Matching refs:key
45 my($key);
87 my $key;
88 for $key (@ExtUtils::MakeMaker::Prepend_parent) {
89 next unless defined $self->{PARENT}{$key};
90 $self->{$key} = $self->{PARENT}{$key};
91 if ($key !~ /PERL$/) {
92 $self->{$key} = $self->catdir("..",$self->{$key})
93 unless $self->file_name_is_absolute($self->{$key});
100 my @cmd = split /\s+/, $self->{$key};
103 $self->{$key} = join(' ', @cmd);
143 foreach $key (sort keys %initial_att){
144 my($v) = neatvalue($initial_att{$key});
147 push @{$self->{RESULT}}, "# $key => $v";