AP
Size: a a a
AP
AT
b
AP
$ perl -E '$a = undef->{a}'
Can't use an undefined value as a HASH reference at -e line 1.
AT
AP
AT
AP
->
, поскольку использование отдельного оператора означает, что пишуший знает что делаетAT
b
$ perl -E '$a = undef->{a}'
Can't use an undefined value as a HASH reference at -e line 1.
AT
AT
AP
AT
AP
AT
AP
AP
VG
OP
$val = $foo->bar->baz->ceo if $foo && $foo->can('bar') && $foo->bar && $foo->bar->can('baz') && $foo->bar->baz && $foo->bar->baz->can('ceo');
«
То будет тормознуто понятно, тут по многу раз вызываются одни и теже методы.
Можно писать
$bar = $foo && $foo->bar;
$baz = $bar && $bar->baz;
...
К чему там был can я вообще не понял