Config::Config is missing on CentOS 6 by default. sigh. fixed it by using ":" regardless the current OS.
This commit is contained in:
parent
092b2f6b83
commit
ca408fc450
|
@ -615,7 +615,10 @@ sub can_run {
|
|||
my $_cmd = $cmd;
|
||||
return $_cmd if -x $_cmd;
|
||||
|
||||
for my $dir ((split /$Config::Config{path_sep}/, $ENV{PATH}), '.') {
|
||||
# FIXME: this is a hack; MSWin32 is not supported anyway
|
||||
my $path_sep = ':';
|
||||
|
||||
for my $dir ((split /$path_sep/, $ENV{PATH}), '.') {
|
||||
next if $dir eq '';
|
||||
my $abs = File::Spec->catfile($dir, $_[0]);
|
||||
return $abs if -x $abs;
|
||||
|
|
Loading…
Reference in New Issue