Select Code to Download

open my $fh1, "<", $file1 or die "Cannot open file $file1: $!";
open my $fh1, "<", $file2 or die "Cannot open file $file2: $!";

use strict;
use warnings;
...
    chomp($test2 //= '');
    say "$test1, $test2";
}