remove redundant archcore directory prefix in installperl

p4raw-id: //depot/vmsperl@5053

diff --git a/installperl b/installperl
index 7c0bed7..00f3df1 100755 (executable)
--- a/installperl
+++ b/installperl
@@ -239,7 +239,7 @@ my @corefiles;
 if ($Is_VMS) {  # We did core file selection during build
     my $coredir = "lib/$Config{'arch'}/$ver";
     $coredir =~ tr/./_/;
-    @corefiles = <$coredir/*.*>;
+    @corefiles = map { s|^$coredir/||i; } <$coredir/*.*>;
 }
 else {
     # [als] hard-coded 'libperl' name... not good!