… | |
… | |
364 | map !exists $section{$_} ? () : do { |
364 | map !exists $section{$_} ? () : do { |
365 | my $attr = delete $section{$_}; |
365 | my $attr = delete $section{$_}; |
366 | |
366 | |
367 | [ |
367 | [ |
368 | $_, |
368 | $_, |
369 | map exists $attr->{$_} && !ignore{$_} ? [$_ => delete $attr->{$_}] : (), |
369 | map exists $attr->{$_} && !$ignore{$_} |
|
|
370 | ? [$_ => delete $attr->{$_}] : (), |
370 | @attr_order |
371 | @attr_order |
371 | ] |
372 | ] |
372 | }, |
373 | }, |
373 | |
374 | |
374 | exists $section{$_} ? [$_ => delete $section{$_}] : (), |
375 | exists $section{$_} ? [$_ => delete $section{$_}] : (), |