push @{$r{join (' 'x8,@F[0..3]) }}, [@F[4,5]];'
##</code><code>##

(
  "I        33        C        C",
  [[0.5, 2], [1, 2]],
  "I        21        B        A",
  [[1, 6], [1, 6]],
  "I        40        D        D",
  [[1, 2], [1, 5]],
  "I        56        A        E",
  [[1, 2]],
  "I        9        A        B",
  [[0.25, 6], ["0.30", 8]],
)