my $orfIDqueryText = "SELECT ORF_ID, C_ID, ORF_name, proteinsequence FROM ORF";
    my $orfIDquery = $dbHandler->prepare($orfIDqueryText);
    $orfIDquery -> execute;

    open (my $fh, '>', 'output.txt') or die "Dit kan niet niet!: $!";
    #get ID from result
    while(my @orfIDarray = $orfIDquery -> fetchrow()){


        ($orfID, $contigID, $naam, $seq)= @orfIDarray;
        print "$seq\n";


        print $fh "$orfID $contigID $naam\n";
        print $fh "$seq\n";