sbsv1_os/e32toolp/e32util/epocrc.pl
branchRCL_3
changeset 16 22bdd8a90cc4
parent 2 99082257a271
equal deleted inserted replaced
13:7416fe50a180 16:22bdd8a90cc4
    14 # Wrapper to support the EPOC Resource Compiler
    14 # Wrapper to support the EPOC Resource Compiler
    15 # 
    15 # 
    16 #
    16 #
    17 
    17 
    18 use warnings;
    18 use warnings;
    19 use strict;
    19 
    20 use Cwd;		# for cwd
    20 use Cwd;		# for cwd
    21 use FindBin;		# for FindBin::Bin
    21 use FindBin;		# for FindBin::Bin
    22 use File::Copy;		# for copy()
    22 use File::Copy;		# for copy()
    23 
    23 
    24 my $curdrive="x";	    	# will be initialised when first needed
    24 my $curdrive="x";	    	# will be initialised when first needed