Это гораздо более кратко написано так
я есть следующий код, который необходимо исправить, так какdefined(@array)
устарел в последнем Perl.
my @inputs = (
( defined @{$padSrc->{inouts}} ? @{$padSrc->{inouts}} : () ),
( defined @{$padSrc->{inputs}} ? @{$padSrc->{inputs}} : () )
);
Я не хочу переезжать вif ( @{ $padSrc->{inouts} } )
такой подход, так как это увеличит мой счетчик строк.