Source
xxxxxxxxxx
--- Makefile.PL.orig 2013-07-02 18:25:02.000000000 -0700
+++ Makefile.PL 2013-07-02 18:26:00.000000000 -0700
#### DO NOT EDIT BEYOND THIS POINT!
require File::Spec;
my ($enc2xs, $encode_h) = ();
-PATHLOOP:
-for my $d (@Config{qw/bin sitebin vendorbin/},
- (split /$Config{path_sep}/o, $ENV{PATH})){
- for my $f (qw/enc2xs enc2xs5.7.3/){
- my $path = File::Spec->catfile($d, $f);
- -r $path and $enc2xs = $path and last PATHLOOP;
- }
-}
+$enc2xs = "@@ENC2XS@@";
$enc2xs or die "enc2xs not found!";
print "enc2xs is $enc2xs\n";
my %encode_h = ();