| author | Shabe Razvi <shaber@symbian.org> |
| Wed, 27 May 2009 14:12:36 +0100 | |
| changeset 112 | 3fc223926c4a |
| child 116 | 47cccedacd2d |
| permissions | -rw-r--r-- |
|
112
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
1 |
#!perl -w |
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
2 |
|
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
3 |
use strict; |
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
4 |
|
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
5 |
my @includefiles = glob "*_includefile.txt"; |
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
6 |
foreach (@includefiles) |
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
7 |
{
|
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
8 |
my $includefilename=$_; |
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
9 |
if (m/(.*)(_includefile.txt)/) {
|
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
10 |
my $zipfilename = $1.".zip"; |
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
11 |
system("7z a -tzip -i@".$includefilename . " " .$zipfilename);
|
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
12 |
} |
|
3fc223926c4a
Add zip tool to support postbuild RnD packaging.
Shabe Razvi <shaber@symbian.org>
parents:
diff
changeset
|
13 |
} |