You might want to have a look at Tie::File on CPAN, this might do what you want.

(I know this was suggested by others, but looking at Tie::* returns an awful lot of results, and this one turns up at rank 100, so I thought it might be useful to be more specific.)

Hope this helps, -gjb-