perl 手册

1：$delay_cycles = $jiafaqi_LATENCY{fpsub};

  print STDERR "##########$delay_cycles $jaifaqi_LATENCY{fpsub}\n";

2：判断语句  == 易于 = 搞混

如if ($width == 1) { 

}

与

if ($width =1) { 

}

不同

for (my $i=0; $i <$NUM; $i++) {
        my $sdram = $sun[$i];


 DD_${sdram}     (D_${sdram}),
DD_${sdram}  (D_${sdram})

}

${sdram}  此时传进去的是$sun[$i]所代表的值。

3：if ($sd =~ //) { 

}

猜测，如果右边的匹配符是空值，可能条件恒成立？没找到资料。

3：

$wlffff = $wertest.$sep.'sim'.$sep.$d22233ut.$sep.'wlf';
$112221111221dut = $wlffff.$sep.$dut.'.wlf';