AP
undef->method не падал, а возвращал андеф.Size: a a a
AP
undef->method не падал, а возвращал андеф.AP
~>AT
AT
AT
AP
AP
AP
$foo->bar->baz->ceo порой приходится делать проверку типа $val = $foo->bar->baz->ceo if $foo && $foo->can('bar') && $foo->bar && $foo->bar->can('baz') && $foo->bar->baz && $foo->bar->baz->can('ceo');AP
AP
use List::Util 'reduce';
sub multicall { reduce { our ($a, $b); $a and $a = $a->$b } @_ }
$val = $obj->multicall(qw(foo foo baz));
AP
AT
AP
AT
b
-> делать ~>AP
AP
-> делать ~>AP
b
AP