@@ -, +, @@ Last modules were not displayed if the number of modules did not match the number of rows of the table (when $number_of_modules % 4 != 0) --- about.pl | 7 +++++++ 1 file changed, 7 insertions(+) --- a/about.pl +++ a/about.pl @@ -108,6 +108,13 @@ foreach (@components) { $row = []; } } +# Processing the last line (if there are any modules left) +if (scalar(@$row) > 0) { + # Extending $row to the table size + $$row[3] = ''; + # Pushing the last line + push (@$table, {row => $row}); +} ## ## $table $template->param( table => $table ); --