So, what have you tried?

Sounds like you want to open the file, read its contents into a hash, muck about with those contents, and write the contents back out. You might find that Tie::File will do the trick for you.