Select Code to Download

0.95 0.02 0.07 0.07 #A
0.03 0.01 0.06 0.83 #C
0.01 0.02 0.80 0.09 #G
0.01 0.95 0.07 0.01 #T

my $filepath = "OP.txt";
my $newdata = readdt2($filepath);
...
  close($IFH);
  return(\%ret);
}