質問の追記

質問

https://okwave.jp/qa/q9973675.html
こちらの質問が直接追記できなかったので、こちらで新たに投稿します。

目的としてはファイル読み込みページが「read.cgi」だったとして、フォームデータ$FORM{'data'}に三行目を代入したとして、そのフォームデータがログファイルの「三行目」が存在する行数を特定し、それが一致したところでその一行前と後の文字列を表示する方法を知りたいです。
掲示板の次ページ前ページみたいな感じです。

回答No.1

OK_WAVE

$ARGV[0]がフォームデータ$FORM{'data'}の受け取りで
print部分をcgiに読み込ませて表示すればどうですか

open my $an,'<','log.txt' or die"$!\n";
my $i = 0;
while( my $bn=<$an> ){ $i++;
print"$bn" if $ARGV[0]-1 == $i and not eof;
print"$bn" if $ARGV[0]+1 == $i and $ARGV[0] != 0;
}
close $an;

補足

やってみましたが、500 internal server errorです