summaryrefslogtreecommitdiff
path: root/Build/cdbuild/tar2find.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Build/cdbuild/tar2find.pl')
-rwxr-xr-xBuild/cdbuild/tar2find.pl25
1 files changed, 0 insertions, 25 deletions
diff --git a/Build/cdbuild/tar2find.pl b/Build/cdbuild/tar2find.pl
deleted file mode 100755
index 70e8925e87d..00000000000
--- a/Build/cdbuild/tar2find.pl
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/usr/local/bin/perl
-while (@ARGV && ($List = $ARGV[0])) {
- print "Process $List\n";
- open(TMP,"$List");
- while (<TMP>) {
- chop;
- $found{$_} = 1;
- while ($_ ne "") {
- if (/(.*)\/(.*)/) {
- $found{$1. "/"} = 0;
- $found{$1} = 0;
- $_=$1;
- }
- else { last; }
- }
- }
- close(TMP);
- open(TMP,">$List");
- foreach $key (sort keys(%found)) {
- print TMP "$key\n" if ($found{$key} eq 1);
-}
- close(TMP);
- shift(@ARGV);
-}
-;