weixin_43724427的博客

perl my.pl -stil infile -output outfile我想要通过-stil -output让用户自己定义infile和outfile。

（想要实现的是从all_bids port里面把含有clk的port给删掉，即all_bids里面的GPI01，02和03）参考如下-----1、下面是一个scan stil format 片段行的截取：“all_bids” = ’ “GPI01” + “GPI02” + “GPI03” +“GPI04” + “GPI05” + “GPI06” ’ ; // #signals = 6“_clk” = ’ “GPI01” +“GPI02” +“GPI03” ’ ; // #signals = 32、

tcl regexp 关键option的索引，不用argv参数索引固定的位置。比如在命令行键入：tclsh .tcl .log -pat_rang1 100 -title AC_scan -pat_rang2（此时option的位置已经打乱）set title_flag 0if ｛[regexp ｛.（-title）\s+（\w+）.｝agrvfullkeytitle]｝｛puts“ag...

argv是参数列表，从tclsh执行*.tcl文件后的第0位为*.log文件，以此类推—如，在终端键入一行命令：tclsh *.tcl *.log -pat_rang1 1000 -pat_rang2 2000foreach item $argv ｛set log_file [lindex $argv 0] # *.logset pat_opt1 [lindex $argv 1] ...