两条语句

饭饭小鱼儿

my($format)      = shift || 'svg';
my($output_file) = shift || File::Spec -> catfile('html', "anonymous.$format");
这两条语句是什么意思呢？

午夜凋零

饭饭小鱼儿 发表于 2013-09-02 09:49
my($format)      = shift || 'svg';
my($output_file) = shift || File::Spec -> catfile('html', "anony ...

这应该是在一个sub里使用的。
如果sub提供了参数，参数会传到@_里，那么就将@_中的参数shift出来，放入$format。
如果sub没有参数，则$format的值为'svg'。

下面那一行也类似。

饭饭小鱼儿

了解~~省略了默认的变量，||是“或”
回复 2# 午夜凋零