Help for this page
if ($mode == 0) { open(INFILE, "<$inFile") || die "Error opening source file for inp +ut! \n"; ... close INFILE; close CRYPTFILE;