my $avg_len = 0; $avg_len = length($string) / 0+@newlines; my $estimated_line = int( $position / $avg_len );