Description: Architecture independent patch for CPAN bug #83994
Author: Christopher Hoskin <christopher.hoskin@gmail.com>
Forwarded: https://rt.cpan.org/Public/Bug/Display.html?id=83994
Last-Update: 2016-09-23

--- a/inst/netsymbols.pl
+++ b/inst/netsymbols.pl
@@ -147,8 +147,20 @@
   return if $slurped{$in};
   $slurped{$in} = 1;
   local *F;
-  my $file = ($sw) ?
-	$in : $Config{usrinc} .'/'. $in;
+  my $file;
+  if ($sw) {
+      $file = $in;
+  } else {
+    my $incpth = $Config{incpth};
+    while ($incpth =~ /(\S+)/g) {
+      my $path=$1 .'/'. $in;
+      if (-e $path) {
+      $file=$path;
+        last;
+      }
+    }
+    return unless ($file);
+  }
   open (F,$file) or return;
   my @new = <F>;
   close F;