common/tools/zip_includefiles.pl
changeset 459 23f06901b597
parent 458 ef8c69f2539d
parent 457 991d89a55c87
child 460 fda39efc6eb8
--- a/common/tools/zip_includefiles.pl	Thu Sep 17 11:20:34 2009 +0100
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,13 +0,0 @@
-#!perl -w
-
-use strict;
-
-my @includefiles = glob "*_includefile.txt";
-foreach (@includefiles)
-{
-    my $includefilename=$_;
-	if (m/(.*)(_includefile.txt)/) {
-		my $zipfilename = $1.".zip";
-		system("7za a -tzip -i@".$includefilename . " " .$zipfilename);
-	}
-}
\ No newline at end of file