Select Code to Download

ID column | column 1
gene 1 | value 1.1
gene 2 | value 2.1
gene 4 | value 4.1
gene 8 | value 8.1

ID column | column 1 | column2
gene 1 | value 1.1 | n.a.
gene 3 | value 3.1 | value 3.2
gene 4 | value 4.1 | value 4.2

# Strict
use strict;
...
    my $pvalues = $output{$id};
    printf "%12.12s | %s\n", $id, join(" | ", @$pvalues);
}