Help for this page
@bigram = ( 'aa' .. 'zz' ); @bigram_list = ("ac" , "ab" , "wd" , "xs" ); ... { }
(...) my @bigram_exist; ... $bigram_exist[i] = 0; { }