Lines Matching refs:elem
2589 my $elem = shift;
2591 -x "$elem/$cmd" && return $elem;
2615 my $elem = shift @elements;
2616 if (!SaneGrep ($elem, @cleanName)) {
2617 push @cleanName, $elem;
2630 my $elem;
2632 for $elem (@Path) {
2633 if ($elem eq '.' || $elem =~ m'^$SOLARENV/' ||
2634 $elem =~ m'/solenv/') {
2635 push @buildPath, $elem;
2637 push @sysPath, $elem;
2650 for $elem (@sysPath) {
2651 if ($elem eq $path) {
2656 if (-f "$elem/$cmd" && ! -l "$elem/$cmd") {
2662 # print "No file $elem/$cmd\n";