PCB-genesis脚本编辑

[snjlc]

有人会GENESIS脚本编辑吗？
我初学、知识浅薄希望与各位交流!
多谢大家的支持！

我搞不明白一个问题了！
在GENESIS中用PERL怎么拾取当前的工作层名并给于变量？

例子用C的可以这样：
COM get_work_layer
set mmm = ($COMANS)

用PERL这样怎么不行
$f->COM("get_work_layer");
$mmm = ($COMANS);

希望有高手指点迷津！

[fibbery]

E:\temp>perl
use Cwd;
print getcwd;
^D
E:/temp

[fibbery]

o ,理解错了，不知道当前工作层是什么意思。还以为是说当前工作目录呢。

[zhangrunze2008]

刚入门，还在学习，真是难了点！哎

[james730]

$mmm = $f->{$COMANS};