如何在perl中以相反的方向读取文件?

I am trying to write the script where i am searching a keyword . As soon as i am getting that keyword i have to backtrack the file i mean i have to start reading the file in opposite direction until i get the desired lines. I am trying to write the script where i am sear