graphicsdeviceinterface/directgdi/test/scripts/conv.pl
changeset 0 5d03bc08d59c
equal deleted inserted replaced
-1:000000000000 0:5d03bc08d59c
       
     1 # Copyright (c) 2007-2009 Nokia Corporation and/or its subsidiary(-ies).
       
     2 # All rights reserved.
       
     3 # This component and the accompanying materials are made available
       
     4 # under the terms of "Eclipse Public License v1.0"
       
     5 # which accompanies this distribution, and is available
       
     6 # at the URL "http://www.eclipse.org/legal/epl-v10.html".
       
     7 #
       
     8 # Initial Contributors:
       
     9 # Nokia Corporation - initial contribution.
       
    10 #
       
    11 # Contributors:
       
    12 #
       
    13 # Description:
       
    14 #
       
    15 
       
    16 
       
    17 my @files = `dir *.mbm /B`;
       
    18 
       
    19 # Convert every .mbm file in the current working directory to a .bmp file.
       
    20 foreach $file (@files)
       
    21 {
       
    22 	chomp $file;
       
    23 	my $bmpfile;
       
    24 	$bmpfile = $file;
       
    25 	$bmpfile =~ s/^(.*)mbm/$1bmp/;
       
    26 	my $cmd = "bmconv /u $file $bmpfile";
       
    27 	print "$cmd\n";
       
    28 	print `$cmd`;
       
    29 }