Select Code to Download

Filename1 Item1 - Answer
Filename2 Item1 - Answer
Filename1 Item2 - Answer

my %files;
$files{Filename1} = [ 'Item1 - Answer' ];
push @{ $files{Filename1} }, 'Item2 - Answer';
...

use strict;
use warnings;
...
    # ...
    close $out_fh;
}