use File::Marker;

my $file = File::Marker->new( $filename );

$file->load_markers( $index_filename );

$file->goto_marker( 22 ); # start of 23rd line