4 my $bldfile = $ARGV[0];
5 my $pkgfile = $ARGV[1];
7 open(BLD
, ">$bldfile") or die "Cannot open $bldfile: $!\n";
9 my $exp_source = "..\\..\\..\\test";
10 my $exp_target = "\\EPOC32\\winscw\\c\\Private";
13 print BLD
"PRJ_PLATFORMS\n";
15 print BLD
"PRJ_EXPORTS\n";
16 doexp
("sample.bmp", "e000101c");
17 doexp
("sample.wav", "e0001003");
18 doexp
("icon.bmp", "e0001004");
19 doexp
("sample.bmp", "e0001006");
20 doexp
("moose.dat", "e0001013");
21 doexp
("sample.bmp", "e0001014");
22 doexp
("sail.bmp", "e0001015");
23 doexp
("icon.bmp", "e0001018");
25 print BLD
"PRJ_MMPFILES\n";
28 open(PKG
, ">$pkgfile") or die "Cannot open $pkgfile: $!\n";
29 print PKG
";Package header\n\n";
31 print PKG
";Languages\n";
33 print PKG
";Header\n\n";
36 print PKG
"#{\"SDL Test\"}, (0xE0001000), 1, 0, 0\n\n";
37 print PKG
"%{\"SDL-EN\"} : \"SDL\"\n\n";
38 print PKG
"*\"\\certificates\\selfsigned.key\", \"\\certificates\\selfsigned.cer\"\n\n";
39 print PKG
"[0x101F7961], 0, 0, 0, {\"Series60ProductID\"}\n";
40 print PKG
";Installed files\n";
42 print "Common file created\n";
44 foreach my $pkgln (@pkgdata)
56 print BLD
"$exp_source\\$s $exp_target\\$t\\$s\n";
57 push(@pkgdata, "\"$exp_source\\$s\"-\"!:\\Private\\$t\\$s\"\n");