1 #Open file matching ex.1;
      2 open (C, "<dic.txt") || die "dictionary";
      3 #open file to write to;
      4 open (B, ">>all.txt") || die "output";