common/tools/zip_includefiles.pl
author Simon Howkins <simonh@symbian.org>
Thu, 06 Aug 2009 10:01:35 +0100
changeset 335 15307a7772ea
parent 116 47cccedacd2d
permissions -rw-r--r--
If a package does not have a definition in the sources.csv then it won't get built, so don't try to incorporate it into the system definition.

#!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);
	}
}