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


in reply to How do you write to the middle of a file?

#!/usr/bin/perl use Tie::File; my $filename = 'foo.dat'; tie @array, 'Tie::File', $filename or die "Cannot open $filename\n"; @array[5] = "Hello, World!\n";