my $linesperpage=56;
my $pagecount;
if ($linecount%$linesperpage == 0) {
    $pagecount = $linecount/$linesperpage;
} else {
    $pagecount = int($linecount/$linesperpage) +1;
}