Lines Matching refs:elem

2606         my $elem = shift;
2608         -x "$elem/$cmd" && return $elem;
2632         my $elem = shift @elements;
2633         if (!SaneGrep ($elem, @cleanName)) {
2634             push @cleanName, $elem;
2647     my $elem;
2649     for $elem (@Path) {
2650         if ($elem eq '.' || $elem =~ m'^$SOLARENV/' ||
2651         $elem =~ m'/solenv/') {
2652             push @buildPath, $elem;
2654             push @sysPath, $elem;
2667         for $elem (@sysPath) {
2668         if ($elem eq $path) {
2673         if (-f "$elem/$cmd" && ! -l "$elem/$cmd") {
2679 #           print "No file $elem/$cmd\n";