Home | History | Annotate | Download | only in util

Lines Matching refs:values

41 my %values = ();
45 push @{$values{$k}}, $v;
55 print STDERR "DEBUG: LIBDIR = $values{LIBDIR}->[0], libdir = $values{libdir}->[0] => ";
56 $values{LIBDIR}->[0] = $values{libdir}->[0] unless $values{LIBDIR}->[0];
57 print STDERR "LIBDIR = $values{LIBDIR}->[0]\n";
59 # warn if there are missing values, and also if there are unexpected values
70 my $v = $values{$k} || [ '.' ];
74 $values{$k} = $v;
79 # the usual form of values for names that have become norm, known as GNU
89 my $v2 = $values{$k} || [ '.' ];
90 $values{$k} = []; # We're rebuilding it
96 push @{$values{$k}}, $v;
97 push @{$values{$kr}},
98 File::Spec->abs2rel($v, $values{$var}->[0]);
100 push @{$values{$kr}}, $v;
101 push @{$values{$k}},
102 File::Spec->rel2abs($v, $values{$var}->[0]);
107 my $v = $values{$_};
145 join("', '", @{$values{$k}}),
153 join("', '", @{$values{$k}}),
156 join("', '", @{$values{$k2}}),
162 our \$VERSION = '$values{VERSION}->[0]';
166 ? split(/ *, */, '$values{LDLIBS}->[0]')
167 : split(/ +/, '$values{LDLIBS}->[0]');