1 #!/usr/bin/perl 2 # ******************************************************************** 3 # * Copyright (C) 2016 and later: Unicode, Inc. and others. 4 # * License & terms of use: http://www.unicode.org/copyright.html#License 5 # ******************************************************************** 6 # ******************************************************************** 7 # * Copyright (c) 2002-2013, International Business Machines 8 # * Corporation and others. All Rights Reserved. 9 # ******************************************************************** 10 11 #use strict; 12 13 require "../perldriver/Common.pl"; 14 15 use lib '../perldriver'; 16 17 use PerfFramework; 18 19 my $options = { 20 "title"=>"Normalization performance: ICU ".$ICULatestVersion." vs. Win", 21 "headers"=>"Win ICU".$ICULatestVersion, 22 "operationIs"=>"code point", 23 "passes"=>"10", 24 "time"=>"5", 25 #"outputType"=>"HTML", 26 "dataDir"=>$CollationDataPath, 27 "outputDir"=>"../results" 28 }; 29 30 # programs 31 # tests will be done for all the programs. Results will be stored and connected 32 my $p = "cd ".$ICULatest."/bin && ".$ICUPathLatest."/normperf/$WindowsPlatform/Release/normperf.exe -b -u"; 33 34 my $tests = { 35 "NFC_NFD_Text", ["$p,TestWin_NFC_NFD_Text" , "$p,TestICU_NFC_NFD_Text" ], 36 "NFC_NFC_Text", ["$p,TestWin_NFC_NFC_Text" , "$p,TestICU_NFC_NFC_Text" ], 37 "NFC_Orig_Text", ["$p,TestWin_NFC_Orig_Text" , "$p,TestICU_NFC_Orig_Text"], 38 "NFD_NFD_Text", ["$p,TestWin_NFD_NFD_Text" , "$p,TestICU_NFD_NFD_Text" ], 39 "NFD_NFC_Text", ["$p,TestWin_NFD_NFC_Text" , "$p,TestICU_NFD_NFC_Text" ], 40 "NFD_Orig_Text", ["$p,TestWin_NFD_Orig_Text" , "$p,TestICU_NFD_Orig_Text"] 41 }; 42 43 my $dataFiles = { 44 "", 45 [ 46 "TestNames_Asian.txt", 47 "TestNames_Chinese.txt", 48 "TestNames_Japanese.txt", 49 "TestNames_Japanese_h.txt", 50 "TestNames_Japanese_k.txt", 51 "TestNames_Korean.txt", 52 "TestNames_Latin.txt", 53 "TestNames_SerbianSH.txt", 54 "TestNames_SerbianSR.txt", 55 "TestNames_Thai.txt", 56 "Testnames_Russian.txt", 57 "th18057.txt", 58 "thesis.txt", 59 "vfear11a.txt", 60 ] 61 }; 62 63 runTests($options, $tests, $dataFiles); 64
