$ pm_extract_1_x.pl
A 3,2
B 1,1
C 1,2
D 0,1
E 1,0
F 0,0