Ну вообще код читаемый :) А так, нужно смотреть класс который описывает объект $person. Его следует переписать.
2015-10-15 8:43 GMT+06:00 Nikolay Mishin <[email protected]>: > Hi Moscow.PM! > > Существует ли какой-либо сбособ сделать более читаемым такой код?: > > push @person_row, (defined $person->get_father()) ? > $person->get_father()->get_id() : undef; > push @person_row, (defined $person->get_mother()) ? > $person->get_mother()->get_id() : undef; > push @person_row, ($person->get_email(), $person->get_homepage()); > > my $date = ""; > if(defined $person->get_date_of_birth()) { > my $date_of_birth = $person->get_date_of_birth(); > $date .= defined $date_of_birth->day ? $date_of_birth->day."/" : ""; > $date .= defined $date_of_birth->month ? $date_of_birth->month."/" : > ""; > $date .= defined $date_of_birth->year ? $date_of_birth->year : ""; > } > > источник > https://github.com/mishin/Ftree-cpan/blob/master/lib/Ftree/Exporters/ExcelExporter.pm#L53 > > -- > С уважением > Николай Мишин > > -- > Moscow.pm mailing list > [email protected] | http://moscow.pm.org >
-- Moscow.pm mailing list [email protected] | http://moscow.pm.org
