# get the last $pos from somewhere
my $pos = 0;

open VIEWFILE, "< $path" or die "Can't open $path: $!<br>\n";
seek (VIEWFILE, $pos, 0) or die "Couldn't seek to $pos: $!<br>\n";

my $count = 100;
while( defined(my $v_file = <VIEWFILE>) and $count--) { 
    print "<div  STYLE=\"font-family:  8pt Courier, 'Courier New', monospace; font-size:.6em;\">$v_file</div><br>";
}

# save $pos somewhere for the next page view
$pos = tell(VIEWFILE);
close VIEWFILE;