open (FILE, "file.index"); while () { chomp; ($pointer, $id, $title) = split ("||"); $fileid{$id} = $pointer; $filetitle{$id} = $title; }