problema con questo codice:


#
# Gestisce la paginazione...
#

my $topics_per_page = $PRE{'topics_per_page'};

if (!$PAGE) { $PAGE = 1 };

my $end = (($PAGE * $topics_per_page)-1);
my $start = ( ($PAGE * $topics_per_page) - $topics_per_page );
my $total_page = int( scalar(@topics) / $topics_per_page );
$total_page++ if ( scalar(@topics) % 10 != 0);

my $page_prev = $PAGE - 1;

if ($PAGE <= 1) { $page_prev = "" };

my $page_next = $PAGE + 1;

if ($PAGE >= $total_page) { $page_next = "" };

my @topics_to_show;
@topics_to_show = @topics[$start .. $end];

@topics = (); # Libero la memoria...
se l'ultima pagina contiene meno topic di quelli da mostrare mi riempe
l'array di "" ... come li levo dall'array?