push(@words_bi,  $words[$_-1] . " " . $words[$_]  );