use Tie::File;

tie @array, 'Tie::File', "filename" or die "something is wrong: $! \n"
+;
[download]

But dont try to use scalar @file or something which tries to calculate the size of @array, as that will start loading the whole array in memory . moreover dont use foreach to traverse this array, as that internally calculates the size of array before traversing it, use while instead