# this routine is to be changed to do the job of data extraction and combination
# ADJUST THIS CODE if test run was successful
sub combine_to {

    my $newfile   = shift;
    my $directory = shift;
    my $filesRef  = shift;

    # DEBUG output
    warn <<DEBUGTEXT;
DATADIR: '$directory'
OUTPUTFILE: '$newfile'
DATAFILES: @{$filesRef}

DEBUGTEXT

}