Select Code to Download

 open KEYWORD, "<", "key.txt" or die $!;
open CLEANTEXT, "<", "cleanText.txt" or die $!;
open CIPHERTEXT, ">", "cipherText.txt" or die $!;
...
  $mytext =~ s/9/nove/g;
  return $mytext;
  }

open KEYWORD, "<", "key.txt" or die $!;
open CIPHERTEXT, "<", "cipherText.txt" or die $!;
open DECIPHERTEXT, ">", "decipherText.txt" or die $!;
...
  $mytext =~ s/9/nove/g;
  return $mytext;
  }