Lines Matching refs:elem
2608 my $elem = shift;
2610 -x "$elem/$cmd" && return $elem;
2634 my $elem = shift @elements;
2635 if (!SaneGrep ($elem, @cleanName)) {
2636 push @cleanName, $elem;
2649 my $elem;
2651 for $elem (@Path) {
2652 if ($elem eq '.' || $elem =~ m'^$SOLARENV/' ||
2653 $elem =~ m'/solenv/') {
2654 push @buildPath, $elem;
2656 push @sysPath, $elem;
2669 for $elem (@sysPath) {
2670 if ($elem eq $path) {
2675 if (-f "$elem/$cmd" && ! -l "$elem/$cmd") {
2681 # print "No file $elem/$cmd\n";