Your post isn't clear about how the user can choose which 100 lines to see. The following will show a specific 100 lines from the file:

my $first_line_to_show = 427;

open VIEWFILE, "< $path" or die "Can't open $path: $!<br>\n";

while( my $v_file = <VIEWFILE>) { 
  next if $. < $first_line_to_show - 1;
  last if $. >= $first_line_to_show + 100;

  print "<div  STYLE=\"font-family:  8pt Courier, 'Courier New', monos
+pace; font-size: .6em;\">$v_file</div><br>";
}

close VIEWFILE;
[download]

-imran