in reply to Tie::File Write Problem
After you tied the file to the @lines array, you never make a modification to the @lines array. See Tie::File.
tie @lines, 'Tie::File', $file or die "No file found to work with."; $lines[0] = 'foo'; # this should change the tied file
In Section
Seekers of Perl Wisdom