1 files changed, 0 insertions, 29 deletions
diff --git a/make/install-extras.pl b/make/install-extras.pl
deleted file mode 100755
index ce77178e9..000000000
--- a/make/install-extras.pl
+++ /dev/null
@@ -1,29 +0,0 @@
-#!/usr/bin/perl
-use strict;
-use warnings;
-
-my $mode = shift;
-my %installed;
-
-for my $dir (qw(src src/modules)) {
-	opendir(DIRHANDLE, $dir);
-	for my $file (sort readdir(DIRHANDLE)) {
-		next unless $file =~ /\.cpp$/;
-		open CPP, '<', "$dir/$file" or die "Can't open $dir/$file to scan it: $!";
-		while (<CPP>) {
-			if (/\/\* \$CopyInstall: (\S+) (\S+) (.*) \*\//i) {
-				my($ifile, $idir, $args) = ($1,$2,$3);
-				next if exists $installed{$1.' '.$2};
-				$installed{$1.' '.$2}++;
-				$idir =~ s/\$\(([^)]+)\)/$ENV{$1}/eg;
-				if ($mode eq 'install') {
-					system "install $args $ifile $idir";
-				} else {
-					$ifile =~ s/.*\///g;
-					system "rm $idir/$ifile";
-				}
-			}
-		}
-	}
-	closedir(DIRHANDLE);
-}