Lines Matching refs:Path
28 use File::Path qw(mkpath rmtree);
127 print STDERR "ERROR: destdir is not absolute path\n";
146 print STDERR "ERROR: prefix is not absolute path\n";
193 if($DESTDIR) { # relative path
196 else { # absolute path
218 # check PATH
219 my $Warn = "WARNING: your PATH variable doesn't include \'$EXE_PATH\'\n";
223 if($ENV{"PATH"}!~/(\A|[:;])\Q$EXE_PATH\E[\/\\]?(\Z|[:;])/i) {
229 if($ENV{"PATH"}!~/(\A|[:;])\Q$EXE_PATH\E[\/\\]?(\Z|[:;])/) {
253 foreach my $Path (sort keys(%Files))
255 if($Path=~/Targets\//)
259 my $Inst = $Path;
261 if(-d $Path)
268 copy($Path, $Inst);
275 my $Path = $_[0];
276 return "" if(not $Path or not -f $Path);
277 open(FILE, $Path) || die ("can't open file \'$Path\': $!\n");
286 my ($Path, $Content) = @_;
287 return if(not $Path);
288 open(FILE, ">".$Path) || die ("can't open file \'$Path\': $!\n");
