my @List1 = qw(a a b);
my @List2 = qw(b b c);
my @List3 = qw(d d e);