http://www.perlmonks.org?node_id=938672


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

[download]

In Section Seekers of Perl Wisdom