15.16. Tie::File

Example 15-20. examples/applications/tie.pl

#!/usr/bin/perl
use strict;
use warnings;

use Tie::File;

tie my @file, 'Tie::File', "data.txt" or die $!;
$file[7] = "Hello";