Что означает // и // = в Perl?

Question

Это часть кода:

return undef if ($mate{$grid_edge->[0]} // '') eq $grid_edge->[1]; 

$node->{count} //= count($node->{low}) + count($node->{high}); 

Так Что // '' и //= означает в Perl в приведенных выше строк кода?

Answer 1

Оператор // официально является оператором Logical Defined-Or.

В первой строке:

($mate{$grid_edge->[0]} // '') 

означает: если $mate{$grid_edge->[0]} определено, использовать это значение, в противном случае использовать '' в качестве значения. Обратите внимание, что одинарные кавычки - это просто пустая строка, а не часть оператора.

Во второй строке:

$node->{count} //= count($node->{low}) + count($node->{high}); 

Если $node->{count} не определен, ему присваивается count($node->{low}) + count($node->{high}).