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


in reply to writing an array of data to a file

try: 
use Tie::File;
tie my @file, 'Tie::File', $position_output_path;
@file = @rows;
untie @file;

[download]
Enjoy,
Mickey

In Section Seekers of Perl Wisdom