common/tools/mergeepoc32.pl
author Simon Howkins <simonh@symbian.org>
Mon, 11 May 2009 13:48:11 +0100
changeset 89 a8aa5d600806
parent 81 5e724ff842b4
child 108 d33d43677cdf
permissions -rw-r--r--
Copy Text::CSV module into source and change to use it, as we can't rely on it appearing in the Perl library when Perl 5.6.1 is installed.

#!perl -w
use strict;

# Assume that all rnd repositories are delivered onto the build machine in \rnd\category\name\epoc32\...

my @rndRepositories = glob "/rnd/*/*";
foreach (@rndRepositories)
{
	s{/}{\\}g;
	system("xcopy /Q/C/I/Y/E $_\\epoc32 \\epoc32 > nul:");
}