23||record1||The Title
1054||record2||The Title #2
2023||record3||The Title #3

##</code><code>##

open (FILE, "file.index");

while (<FILE>) {
 chomp;
 ($pointer, $id, $title) = split ("||");
 $fileid{$id} = $pointer;
 $filetitle{$id} = $title;
}