Teradata Perl迁移

执行以下命令设置源数据库、输入和输出文件夹路径、日志路径和应用程序语言：

Linux:

./runDSC.sh 
--source-db|-S Teradata
[--application-lang|-A Perl]
[--input-folder|-I <input-script-path>]
[--output-folder|-O <output-script-path>] 
[--conversion-type|-M <Bulk or BLogic>]
[--log-folder|-L <log-path>]

Windows:

runDSC.bat
--source-db|-S Teradata
[--application-lang|-A Perl]
[--input-folder|-I <input-script-path>]
[--output-folder|-O <output-script-path>] 
[--conversion-type|-M <Bulk or BLogic>]
[--log-folder|-L <log-path>]

./runDSC.sh --input-folder /opt/DSC/DSC/input/teradata_perl/ --output-folder /opt/DSC/DSC/output/ --source-db teradata --conversion-type Bulk --application-lang PERL

工具执行时，控制台上会显示迁移汇总信息，包括进度和完成状态。

********************** Schema Conversion Started *************************  
DSC process start time : Mon Jan 20 17:24:49 IST 2020  
Statement count progress 100% completed [FILE(1/1)]    
Schema Conversion Progress 100% completed  
**************************************************************************   
Total number of files in input folder : 1  
**************************************************************************  
Log file path :....../DSC/DSC/log/dsc.log  
DSC process end time : Mon Jan 20 17:24:49 IST 2020  
DSC total process time : 0 seconds 
 ********************* Schema Conversion Completed ************************

有关Perl迁移的配置参数，详情请参见Teradata Perl配置。

有关命令行参数，详情请参见数据库模式迁移。

• DSC对输入文件进行格式化，并将格式化后的文件归档到输出文件夹中。用户可以直接比对该输出文件和输出文件。
• 确保输入路径中没有空格。如果存在空格，则DSC会报错。详情请参见故障处理。
• 日志详情请参见日志参考。
• 如果输出文件夹中包含子文件夹或文件，DSC会在执行迁移前将其删除或者根据用户设置（config文件夹中application.properties配置文件）将其覆盖。已删除或覆盖的子文件夹或文件无法通过DSC恢复。
• Process start time和Process end time分别表示迁移流程的开始和结束时间。Process total time是DSC完成整个流程所用的总时间（以毫秒为单位）。在控制台上还显示已迁移文件的总数、用户配置的处理器总数、已使用的处理器数量以及日志文件和错误日志文件的路径。
• 设置perl-migration.properties文件中的--add-timing-on参数为true，通过添加自定义脚本来计算语句执行时间。

  示例：

  输入

  1 2 3 4

  $V_SQL2 = "SELECT T1.userTypeInd FROM T07_EBM_CAMP T1 WHERE T1.Camp_List_Id = '$abc'"; $STH = $dbh->prepare($V_SQL2); $sth->execute(); @rows = $sth->fetchrow();

  输出

  $V_SQL2 = "SELECT T1.userTypeInd FROM T07_EBM_CAMP T1  WHERE T1.Camp_List_Id = '$abc'";
  $STH = $dbh->prepare($V_SQL2);
  use Time::HiRes qw/gettimeofday/;
  my $start = [Time::HiRes::gettimeofday()];
  $sth->execute();
  my $elapsed = Time::HiRes::tv_interval($start);
  $elapsed = $elapsed * 1000;
  printf("Time: %.3f ms\n", $elapsed);
  @rows = $sth->fetchrow();

• --input-folder中指定的文件和文件夹不得拥有GROUP和OTHERS的写权限，即，--input-folder参数指定的文件夹权限不得高于755。出于安全考虑，如果输入文件或文件夹具有写入权限，则不会执行DSC。
• 在并发迁移场景下，每次迁移的输入路径必须是唯一的。