摘要:
#!/usr/bin/perl -w my $now = `date +%y_%m_%d_%Hh%Mm`; open(FH, "<./eco_changes.tcl") or die "Cant open file $!"; open (OUT,">tempus_from_pt.tcl"); pri 阅读全文
摘要:
set terms [dbGet [dbGet top.insts.cell.name JLFLS064K09DG -p2].pgInstTerms.name VPP -v -p1] set n 0 foreach term $terms { set inst [dbGet $term.inst] 阅读全文