sbsv1_os/e32toolp/e32util/epocmbm.pl
branchRCL_3
changeset 16 22bdd8a90cc4
parent 2 99082257a271
equal deleted inserted replaced
13:7416fe50a180 16:22bdd8a90cc4
    11 # Contributors:
    11 # Contributors:
    12 #
    12 #
    13 # Description:
    13 # Description:
    14 #
    14 #
    15 
    15 
    16 use strict;
       
    17 use Cwd;		# for cwd
    16 use Cwd;		# for cwd
    18 use File::Basename;	# for basename()
    17 use File::Basename;	# for basename()
    19 use FindBin;		# for FindBin::Bin
    18 use FindBin;		# for FindBin::Bin
    20 my $PerlBinPath;	# fully qualified pathname of the directory containing this script
    19 my $PerlBinPath;	# fully qualified pathname of the directory containing this script
    21 
    20