Select Code to Download

##merge data after filtering
sub singlefile {
...
    }
    close(FILE);
}

##merge data after filtering
sub singlefile {
...
        print FILE $keep if $keep;
        close(FILE);
        }