in reply to Re: extract and export to multiple files
in thread extract and export to multiple files

open my $inFile, '>', $inpath or die "Failed to open $inpath: $!";

Your $inpath is being opened for output.

open my $inFile, '<', $inpath or die "Failed to open $inpath: $!";